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Bevezetés 


A Commodore 128 I. kötet a számítógép működésének alapjait tartalmazta, s első- 
sorban a BASIC V7.0 programnyelvet ismertette. A II. kötet a gép programozásához 
szükséges további ismereteket tartalmazza. A C-64-es üzemmódról csak elvétve esik 
szó, a könyv elsősorban a CP/M üzemmód működésével foglalkozik. 


A C-128-as üzemmódról szóló rész tartalmazza a BO oszlopos video chip részletes 
leírását, továbbá az új 1571/70-es lemezegységek használatát. 


A C-128-as rész CP/M rendszerének fejlesztése még jelenleg is tart. A könyv az 1986 
év végi állapotot ismerteti, az újabban vásárolt gépek operációs rendszere már eltérhet 
attól, elsősorban abban, hogy többet tud. 


A Commodore 128-cal adott CP/M rendszerlemez önmagában semmit sem ér, hiszen 
egyetlen program- fejlesztő eszközt sem tartalmaz. A szóbajöhető programnyelvek közül 
végül is a Turbo Pascalt választottam ki, elsősorban azért, mert használata egyszerű, s 
a programnyelv majdnem ugyanilyen formában működik a 16 bites gépeken is. Úgy 
vélem, hogy a Commodore 128-as gépet CP/M-ben elsősorban Turbo Pascal-ban kell 
programozni. Ezért erről a programozási nyelvről, s főleg a C-128-as sajátosságairól 
részletesen szólunk a 13. és 14. fejezetekben. 


A 15. fejezet két makro assembler fejlesztő rendszert ismertet. A használt Z80-as 
mnemonikok kiválasztása nem volt könnyű. A Commodore 128-hoz a Digital Research 
által kifejlesztett RMAC fejlesztő rendszert lehet "hivatalosan" megvásárolni, ugyanakkor 
a Z80-as processzor miatt szükség lehet a ZSID-szerű mnemonikok használatára. Az 
RMAC és a hozzá tartozó egyéb rendszerprogramok segítségével pl. nem lehet vissza 
assemblálni a CP/M programokat, mert a BIOS tartalmaz olyan 780-as utasításokat is, 
amelyek nincsenek benne az Intel 8080 processzor utasításaiban is. Az eltérő 
mnemonikok használatát sem könnyű megszokni. A részletek iránt érdeklődőknek 
javasoljuk Hofmanné Boskovitz Éva: Z80 assembler című, az LSI ATSZ gondozásában 
megjelent könyvét. 
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8. fejezet 


A C-128-as operációs rendszer 


8.1 A társprocesszorok működése 


A Z80A jelű mikroprocesszor a Zilog 280-as processzor 4MHz-es változata. A Z80 és a 
8502-es processzorok társprocesszorként dolgoznak, ami azt jelenti, hogy ugyanazt a 
buszt használják. Ennek egyik következménye, hogy egyszerre csak egyikük dolgozhat. 
A C-128 hardverének kialakítása során a közös busz elérésének a biztosítása lehetett a 
legnehezebb. Ennek két oka van. Egyrészt a két processzor eltérő módon kezeli a buszt, 
másrészt a VICIIla video chip közvetlenül ír és olvas a memóriából. A megoldás végül 
is egyszerű: a PLA gondoskodik arról, hogy abban az esetben ha a buszon érvénytelen 
cím vagy adat van (a 8502-es címzési eljárásából adódóan), a Z80A ne dolgozzon. Ez a 
Z80A sebességét a felére csökkenti. A megoldás sokkal megbízhatóbb, mint a C-64-hez 
kapható Z80-as cartridge esetén. A C-128 nem szokott lemerevedni. 


A számítógép bekapcsolásakor, vagy hardver reset (a RESET gomb megnyomása) 
esetén a vezérlés a Z80A processzorra kerül s az egy RST 00 utasítással megkezdi a 
működését. A Z80A választását a 8502 eltérő busz kezelése indokolja; ellenkező esetben 
(lásd a Commodore 64-et) a rendszer könnyen lemerevedhet. A Z80A bekapcsolásával 
egyidőben a hardver gondoskodik arról, hogy a processzor memória területén 
megjelenjen a 4K-s Z80 ROM. Ennek következtében a számítógép bekapcsolásakor a 
Z80 ROM 0-ás címétől kezd a rendszer futni. A minket érdeklő programrész listája 
(ZSID-del vissza assemblált kód!): 


2780-as kód: 
0000 lda3e 0-ás szelet és I/O terület 
Id (ff00),a ; bekapcsolása 


jp 003b ; ugrás az rst 00 további részére 
003b ld be.dO2f ; a VICIla chip 47. regisztere 

Id defffc ; d-ben a billentyűzet lekérdezése 

out (c).d ; letiltva 

inc bc ; a VICIla chip 48. regisztere 

out (c)e ; MHz-es órajel 

Id bc,.d505 ; mód konfigurációs regiszter 

Id a,boO ; /EXROM és /GAME ellenőrzése 

out (c)a ; a megfelelő bitek bemenetek 

in ac) ; a bitek olvasása 

epl ; invertálás 

and 30 ; a két bit kiszűrése 

jr z0059 ; ha egyik sem O, akkor nincs 


a rendszerben C-64-es cartridge 


ld afi ; 8502 és a C-64 mód kijelölése és 
out (c) a ; bekapcsolása 
rst 00 
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0059 


007c 


0084 


00a0 
00a2 


00ae 
0051 


Id bc.dcOf 
Id a,08 
out (c),a 
dec c 

out (c) a 
ld c,03 
xor a 

out (c) a 
dec c 

dec a 

out (c), a 
dec c 

dec c 

Id a,7f 
out (c) a 
inc be 

in a.(c) 
and 20 

ld bc,d505 
jr z.0054 


ld hiOfb4 
Id bc,d50a 


dec d 

jr nz0084 
Id hlOd1a 
Id de,1100 
Id bc,0008 
Idir 

Id hIl0ee5 
Id deffdO 


ld hI,1100 
Id (fffa),hl 
Id (fffc),hl 
Id (fffe),hl 
Id (ffdd),hl 
ip ffeO 


8502-es kód: 


1100 


300 


Ida $$00 
sta $ff00 
imp ($fffc) 


a 
fi 
, 
, 
, 


; a CIA$1 CRB kijelölése 


és az A és B időzítők beállítása 
a B időzítő 

CRA kijelölése 

az A időzítő 


; a DDRB kijelölése 


akku-0 

a B kapu bitjei bemenetek lesznek 
a DDRA kijelölése 

akku-ff 

az A kapu bitjei kimenetek lesznek 
PORTA kijelölése 


a cC-5-ot tartalmazó oszlop 
kiválasztása 

a PORTB kijelölése és 

az adatok beolvasása 

a cC-5-nak megfelelő bit kiszűrése 
mód konfigurációs regiszter kijelölése 
ha a CC-5 billentyű le volt nyomva 
áttérés C-64-es módba 


az MMU 11 regiszterének beállítása: 
másolás a Ofb4-től visszafelé 

a d50a-ba (szintén visszafelé) 

egy byte átírása 


mutatók csökkentése 


Od1a-tól 
1100-ra 
8 byte másolása 


; 0€e€5-től 
; ffdO-ra 
; 31 byte másolása 


; hI-be kerül a 1100 mutató 
; hl másolása fffa-ba 


fffc-be 

fffe-be és 

ffdd-be 

a rst 00 végére ugrás 


; összes ROM kijelölése és 


bekapcsolása 


; ugrás a hardver RESET vektorra 
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ffdo — sei ; megszakítások letiltása 
Ida 4$3e ; a 0-ás RAM, I/O kijelölése és 
sta $ffO0o0 ; bekapcsolása 
Ida $$boO ; 280-as processzor kijelölése és 
sta $d505 ; bekapcsolása 
nop ; kötelező üres utasítás 

ffdc . jmp $3000 ; 8502-es program folytatása 
nop 

780-as kód: 

ffe0 — di ; megszakítások letiltása 
Id a3e ; a 0-ás RAM, I/O kijelölése és 
Id (ff00),a ; bekapcsolása 
Id bc,d505 ; mód konfigurációs regiszter és 
Id a,b1 ; a 8502-es processzor kijelölése majd 
out (c),a ; a 8502-es bekapcsolása 
nop ; kötelező üres utasítás 

ffee — rst 38 ; a 280-as kód folytatása 


A RST 00 végrehajtása a 0-ás memóriaszelet és az I/O terület kijelölésével kezdődik. 
Ne felejtsük el, hogy a memória első 4K-s része azonban a Z80 ROM! Ezt követően a 
003b-0052 rész ellenőrzi, hogy nincs-e C-64-es cartridge a gépben. Ha igen, a 0054- 
0056 utasítások bekapcsolják a C-64-es üzemmódot. 

A 0059-007a részek megvizsgálják, hogy nincs-e lenyomva a CC-5 billentyű. Ha igen, 
akkor újból a C-64-es mód bekapcsolására kerül a sor. Ellenkező esetben a 007c-00ae 
programrész a 280-as ROM-ból két programrészt átmásol a 1100, illetve ffdO címekre. 
Ezek közül az első az 8502-es kód, míg a második felerészben 8502-es, felerészben 
7280-as kód. A két programrész a két processzor közti átkapcsolást biztosítja. 


A 00a2-00ae közötti programrész a 8502 valamennyi hardver vektorába a 1100 mutató 
értékét tölti, majd a vezérlés az ffeO címre kerül. Itt a rendszer bekapcsolja a 8502-es 
processzort, ami a 1100 címtől kezd el futni. Ide a Z80 egy rövid kódot másolt, ami 
bekapcsolja az összes ROM-ot és a hardver RESET vektorra ugrik. 

A Z80 a NOP utasítás előtt állt meg. Ha a 8502-es ezek után bárhonnan visszaadja a 
vezérlést a 280-nak csak úgy teheti, hogy a 0-ás lap ffee címén egy érvényes Z80-as 
utasítás van. A Z80 innen fogja a futását folytatni. 


Az ffdO programrész a fordított kapcsolatra való. Ha a jmp $ffdO utasítással kapcsoljuk 
ki a 8502-est és indítjuk a Z780-at akkor a jp ffeO utasítással visszakapcsolhatjuk a 
8502-est. Ehhez azonban az ffdc címen egy 8502-es utasításnak kell lennie, mert ott 
fogja a futást a 8502-es folytatni. 


Az alábbi BASIC program a 40 oszlopos képernyő bal felső sarkába ír egy a betűt. Ezt 
egyszerűen is megtehetnénk a POKE 1024,1 utasítással. Ehelyett bekapcsoljuk a 7280-as 
processzort, azzal iratjuk a memóriába az "a" karakter képernyő kódját, majd 
visszakapcsoljuk a 8502-es processzort és visszatérünk a BASIC-be. 
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1000 bank 0 

1010 poke dec("8000"),0O 

1020 cim-dec("ffee"): db-8 
1030 gosub 1110 

1040 cim-dec("ffdc"): db-2 
1050 gosub 1110 

1060 scencelr 

1070 sys dec("ffd0") 

1080 poke 1024.peek(dec("8000")) 
1090 end 

1100 : 

1110 for i-cim to címtdb-1 
1120 : read a$: poke i,dec(a$) 
1130 next i 

1130 return 

1150 : 

1160 rem 280 kod 

1170 rem kk kek 

1180 : 

1190 data 3e01 :rem ld a,!1 
1200 data 32,00,80: rem Id (8000),a 
1210 data c3,e0ff: rem jp ffe0 
1220: 

1230 rem 8502 kod 

1240 rem kikátkkk 


1250 : 
1260 data 58 : rem cli 
1270 data 60 : rem rts 


Az 1110-1140 sorokban található alprogram a READ utasítás segítségével beolvas db 
számú karaktert és a memória CIM-étől kezdve elhelyezi. Ezt az alprogramot kétszer 
hívtuk meg: a 8502-es, illetve a 280-as kód átmásolásához. A program elején külön be 
kellett a BANK utasítással a megfelelő memóriaszeletet (0-ás szelet) állítani. 


A Z80-as kód az A regiszterbe tölti az 1-et (az "a" karakter képernyő kódját), majd ezt a 
8000-es címre írja. Ezt követően a 2780-as visszaadja a vezérlést a 8502-es 
processzornak. Az a cli utasítással megengedi a megszakítások lekezelését és visszatér 
a BASIC-be. 


Maga a BASIC program - a megfelelő memória tartalmak beállításán túl először törli a 
8000-es memóriacímet, majd a SYS DEC("FFDO") utasítással átadja a vezérlést a 280-as 
processzornak. A gépi kódú alprogramból való visszatérést követően a 8000-es 
memóriahely tartalmát átmásolja a képernyőmemória első címére. (Ez felel meg a bal 
felső karakternek.) 


A 280-as rutin nem tud közvetlenül a $0400-as címre írni. Ennek oka, hogy a 0-ás RAM 
és a 280-as processzor használata esetén a $0000-$Offf címeken mindig a 280-as ROM 
található. Ezért a Z80-as egy segédregiszteren keresztül írhat csak a C-128 BASIC 
interpreter által használt képernyő memória területére. 
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Ha a C-128-hoz vásárolható SID (Symbolic Instruction Debugger), vagy a C64 CP/M- 
jéhez adott DDT gépi kódú monitort használjuk, akkor nincs lehetőségünk arra, hogy a 
0-ás lapon levő programrészeket olvashassuk. Ehhez ezeket a MOVE és XMOVE BIOS 
rutinok segítségével át kell másolnunk a 0. szeletről az 1. szeletre. Az alábbi egyszerű 
rutin a 280-as ROM-ot másolja át az 1. szeletre a $5000 címtől kezdődően. (A $0000-ra 
nem tehetjük, mert akkor az a monitort felülírná. Megint a ZSID-del készítettük el a 
programot: 


a4000 

4000 ld b,1 ; másolás az 1. szeletre 
4002 ld cŐ0 másolás a 0. szeletre 
4004 call Of8ab XMOVE végrehajtása 


4007 ld de0 ; az első másolandó karakter régi és 
400a ld  hI,5000 ; új helye 

400d ld  bc,1000 ; átmásolandó karakterek száma, 1Kbyte 
4010 call 0f8a0 ; másolás végrehajtása 

4013 ret ; vissza a monitorhoz 


Abban az esetben ha a Digital Research SID monitorát használjuk, akkor a fenti 
asszembli rutint a következőképpen kell! begépelni: 


a4000 

4000 mov b,! ; másolás az 1. szeletre 
4002 mov c0 másolás a 0. szeletre 
4004 call f8ab XMOVE végrehajtása 


4007 Ixi de,0 ; az első másolandó karakter régi és 
400a  lxi hI,5000 ; új helye 

400d Ixi bc,1000 ; átmásolandó karakterek száma, 1Kbyte 
4010 call f8a0 ; másolás végrehajtása 

4013 ret ; vissza a monitorhoz 


A rutint a c4000 monitor paranccsal futtassuk le. (Ha a call monitor parancsot nem 
ismeri a rendszerünk, akkor ret helyett a rst 38 paranccsal fejezzük be a rutint, s 
94000-rel indítsuk el!) 


A rutin lefuttatása után a 280 ROM a processzor memória területén az 5000 címtől 
megjelenik, s működését tanulmányozhatjuk. Mivel az eredeti ROM-ban van, ezért 
átírására természetesen nincs lehetőség. 

Hasonló módszerrel a 0. szelet akármelyik részét átmásolhatjuk az 1. szeletre, s ott 
módosíthatjuk is. 
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8.2 A C-128-as üzemmód beállítása 


A C-128-as üzemmód működése nagyon sok hasonlóságot mutat a Commodore 64 
működésével. Az eltérések a következőkből adódnak: 


- a képernyő szerkesztő működése; 
- a memória szeletei közti lapozás; 
- az eltérő inicializálás; 

- a társprocesszorok használata; 

- új KERNAL rutinok. 


A képernyő szerkesztő eltérő működését csak jelezzük. Az osztott képernyő használata 
esetén a C-128 használja a raszter szerinti megszakítást is. Ez okozza a képernyő 
szerkesztő eltérő működését. Ebben az esetben a megszakítások sokkal gyakoribbak és 
nagyon pontosan kell lekezelni ezeket. További eltérés az ablak technika alkalmazása. 
Ennek következtében egyes KERNAL paraméterek az ablak bal felső sarkára, s nem a 
fizikai képernyő bal felső sarkára vonatkoznak. 


A memória szeletek közti lapozás lelassítja a gép működését. A 2MHz-es órajel éppen 
hogy csak korrigálni tudja ezt a lassulást a C-64-es módhoz képest. A számításigényes 
vagy sok adatot mozgató programok gyorsabbak C-64-es üzemmódban, mint C-128 
módban! A memória szeletek használatáról részletesen szóltunk a 7.3 fejezetben. A 
továbbiakban a C-128-as eltérő inicializálását ismertetjük. 


Valahányszor a 8502-es processzor RESET lábán egy lefutó él megjelenik, a procesz- 
szor egy indirekt vezérlésátadást hajt végre a $FFFC-ben tárolt vektorra. Ez mind- 
annyiszor megtörténik, valahányszor bekapcsoljuk a számítógépet, vagy megnyomjuk a 
gép oldalán levő RESET gombot. 


A 8502-es chip működését azonban - rögtön a RESET lábon megjelenő lefutó él 
megjelenésekor - a PLA felfüggeszti és a vezérlést a Z80A processzornak adja át. Mint 
az előző részben leírtuk, a Z8OA ellenőrzi, hogy nincs-e a rendszerben C-64-es 
cartridge, vagy nincs-e megnyomva a aC-5 billentyű. Ha igen, akkor a Z80A 
közvetlenül bekapcsolja a C-64-es módot. Ellenkező esetben a Z80A beállítja az MMU 
regisztereit, s átadja a vezérlést a 8502-esnek, ami ezután tudja csak a $FFFC vektorra 
való ugrást végrehajtani. 

Amikor a 8502-es processzor elindul, akkor a START KERNAL rutin minden esetben 
végrehajtja a következő funkciókat: 


- bekapcsolja az összes ROM-ot és a 0-ás RAM-ot; 
- letiltja a megszakításokat; 

- törli a processzor verem-mutatóját; 

— törli a decimális módot; 

-— inicializálja az MMU-t; 

- lemásolja a ROM-ból a RAM rutinokat; 

- ellenőrzi és beállítja a SYSTEM vektort; 

- ellenőrzi a rendszerbeli ROM-okat. 
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Az utolsó két lépés kivételével a KERNAL mindig pontosan ugyanazt végzi el. Azok 
eredménye azonban azon múlik, hogy a SYSTEM vektor (lásd később) mit tartalmaz, 
illetve, hogy milyen ROM  cartridge-okat használunk. A SYSTEM rutin lehetőséget 
biztosít arra, hogy a KERNAL felismerje, hogy egy "hideg" vagy "meleg" újraindítás 
történt. Az utóbbi feltétele, hogy a $FFF5-$FFF7 címeken a CBM karaktersorozatot 
találja a rutin. Ebben az esetben a $FFF8-$FFF9 címeken levő vektort átmásolja a $02- 
es címre és végrehajt egy JMP($0002) utasítást. Ha nem találja a CBM sorozatot, akkor 
tovább folytatja a rendszer inicializálását. A SYSTEM KERNAL rutin a $FFF8B címen 
található. 


A ROM-ok ellenőrzése ugyancsak a CBM karaktersorozat megkeresésével történik. A C- 
128 cartridge-ok első byte-jai a következőt kell, hogy tartalmazzák: 


- $0000 hideg indítás; 
- $0003 meleg indítás; 
- $0006 azonosító kód; 


- $0007-$0008  "CBM karaktersorozat. 


A byte-ok természetesen mindig a cartridge ROM kezdőcímétől értendőek. A lehet- 
séges kezdőcímek: $8000, $CO0O0. A ROM-ok keresése az alábbi sorrendben történik: 
külső alsó ROM ($8000, 16K vagy 32K), külső magas ROM ($C0O00, 16K), belső alsó 
($8000, 16K vagy 32K) végül belső felső($C000,16K). A rendszer a cartridge-ok azo- 
nosítóit a $AC1-$AC4 táblázatba másolja. Az azonosítók egyben a cartridge-ok prio- 
ritását is megadják. Az alacsonyabb azonosítójú cartridge-nak nagyobb a prioritása. Az 
azonosító nem lehet 0, ugyanis a C-128 a $AC1-$AC4 táblázat nullától különböző 
értékeit tekinti jelen levő ROM-nak. Az 1 érték önindító ROM-nak felel meg, a rendszer 
automatikusan a cartridge hidegindítási pontjára adja a vezérlést egy JSR utasítással. 
Ha a cartridge végrehajt egy megfelelő RTS utasítást, akkor folytatódik a rendszer 
inicializálása. Különben a cartridge-nak kell teljes egészében gondoskodnia az 
inicializálásról. Az 1-től eltérő azonosítójú ROM-ok inicializálására később kerül sor. 

A C-128 tovább folytatja az inicializálást: 


az IOINIT KERNAL rutin inicializálja a perifériákat; 

- ellenőrzi a CSTOP5 és C€C-5 billentyűket; 

- beállítja a 0-ás lapon levő indirekt ugrási címeket; 

a CINT KERNAL rutinnal inicializálja a képernyő szerkesztőt; 
BASIC kezdőértékek beállítása; 

- belépés a BASIC várakozó ciklusába. 


A leglényegesebb szerepe az IOINIT rutinnak van: ez állítja be mindkét CIA chip re- 
gisztereit, a VIC szeletét, a PAL kijelzést. Ugyancsak ez a rutin állítja be a SID, a VIC és 
a 8563 chip kezdőértékeit, letölti a karakterek alakját. 

A rendszer indulását - a jelenlevő ROM-okon kívül - a CSTOP5 vagy a C€C-5 bil- 
lentyű lenyomása befolyásolja. Az utóbbit már a Z80 ellenőrzi, így itteni ellenőrzése 
felesleges. Ha a cSTOP5 billentyűt lenyomott állapotban találja, akkor nem a BASIC- 
be, hanem a monitorba lép be a rendszer. Ennek következtében kimarad a BASIC 
rendszerváltozók inicializálása. Ez főleg akkor hasznos, ha egy gépi kódú programrész 
kipróbálása közben elszáll a rendszer, és minél kevesebb memóriarész törlésével 
akarjuk a rendszert a RESET gombbal újraindítani. 


Az inicializálási eljárás legvégén kerül sor a BASIC rendszerváltozók inicializálására. Ez a 


programrész meghívja a PHONIX KERNAL rutint, ami valamennyi ROM-ot elindít, illetve 
a 8-as lemezegységet ellenőrzi: nincs-e önindítós (bootable) lemez benne. 
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A $A04 memóriacím ad felvilágosítást a rendszer inicializálásának előrehaladásáról. 
Ennek a regiszternek a megfelelő beállításával elérhetjük, hogy egyes részek kima- 
radjanak. A $A04-et a rendszer a következőképpen használja: 


- $8B7 8563 karakterek már átmásolva; 
- $8B6 CINT már végrehajtva; 
- $8B0 BASIC már inicializálva. 


Ha az IOINIT-et meghívja a rendszer és $A04 tartalma $B7, akkor a rutin nem tölti át a 
8563 karakterkészletét. Ha $B6 van beállítva, akkor a CINT nem írja felül a billentyűzet 
mátrix kódtábláit. 
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8.3 Memória térkép 


Név Cím Leírás 
hexa. dec. 
D6510 0000 (0) 8510 processzor adat-irány regisztere 
R6510 0001 1 8510 processzor adatregiszter 
BANK 0002 2 a használt szelet száma 
PC$HI 0003 3 a SYS címének felső byte-ja 
PC$LO 0004 4 a SYS címének alsó byte-ja 
S$REG 0005 5 a processzor ST byte-jának ideiglenes tárolása 
A$REG 0006 6 a processzor A regiszterének ideiglenes tárolása 
X$REG 0007 7 a processzor X regiszterének ideiglenes tárolása 
Y$REG 0008 8 a processzor Y regiszterének ideiglenes tárolása 
STKPTR 0009 9 a veremmutató (SP) tárolása 
ENDCHR 000A 10 jelző: keresés a sztring végéig 
TRMPOS 000B 11 az utolsó TAB-tól az oszlopok száma 
VERCK 000C 12 jelző: 0-LOAD, 1-VERIFY 
COUNT 000D 13 input puffer mutató, a tömb dimenziójának száma 
DIMFLG 000E 14 Tömb default dimenziója (-10) 
VALTYP 000F 15 Adattípus: $FF - sztring, $00 5 numerikus 
INTFLG 0010 16 Adattípus: $00 - valós, $80 - egész 
GARBFL 0011 17 szemétgyűjtés jelzője, LIST, DATA használja 
SUBFLG 0012 18 FN jelző 
INPFLG 0013 19 $00 - INPUT, $40 - GET, $98 - READ 
TANSGN 0014 20 TAN előjele 
CHANNL 0015 21 aktiv I/O száma, input kérdés jelzője 
LINNUM 0016-0017 22 sorszám jelzője 
TEMPPT 001 24 ideiglenes sztring verem mutatója 
LASTPT 0019-OOT1A 25 utolsó sztring cím 
TEMPST 0018B-0023 27 verem a sztringleírók ideiglenes tárolására 
INDEX1 0024-0025 36 mutató sztringműveletekhez 
INDEX2 0026-0027 37 mutató sztringműveletekhez 
RESHO 0028-002C 40 szorzás lebegőpontos eredménye 
TXTTAB 002D-O0OZ2E 45 mutató: BASIC szöveg eleje 
VARTAB 002F-0030 47 mutató: BASIC változók kezdete 
ARYTAB 0031-0032 49 mutató: BASIC tömbök kezdete 
STREND 0033-0034 ca ! mutató: BASIC tömbök vége t 1 
FRETOP 0035-0037 53 mutató: a sztring terület eleje 
FRESPC 0037-0038 55 mutató sztringműveletekhez 
MAX$MEM$1  0039-003A 57 mutató: a sztringterület vége az 1. szeleten 
CURLIN 0038B-003C 59 aktuális BASIC sorszám 
TXTPTR 003D-003E 61 CHRGET mutatója 
FORM 003F-0040 63 PRINT USING segédváltozója 
DATLIN 0041-0042 65 aktuális DATA sorszáma 
DATPTR 0043-0044 67 aktuális DATA mutatója 
INPPTR 0045-0046 69 INPUT rutin vektora 
VARNAM 0047-0048 71 aktuális BASIC változó neve 
VARPNT 0049-004A 73 aktuális BASIC változó értékére mutató 
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FORPNT 0048B-004C 75 mutató: FOR/NEXT segédváltozó 
VARTXT 004D-004E 77 mutató a programszámlálónak 
OPMASK 004F 79 segédváltozó 
DEFPNT 0050-0051 80 mutató az FN definíciójára 
DSCPNT 0052-0054 82 
HELPER 0055 85 jelző: HELP vagy LIST használja 
JMPER 0056 86 

0057 87 
OLDOV 0058 88 
DECCNT 005F 95 tizedesjegyek száma 
TENEXP 0060 96 
DPTFLG 0061 97 tizedespont jelzője 
FAC 0063-0068 99 lebegőpontos akkumulátors$ 1 
SGNFLG 0069 105 — hatványsor kiértékeléshez segédregiszter 
ARG 006A-OO6F 106 — lebegőpontos akkumulátor42 
ARISGN 0070 107 előjel összehasonlítás eredménye 
FACOV 0071 108 FACH$1 kerekítés 
FBUFPT 0072-0073 114  — mutató: kazetta puffer 
AUTOINC 0074-0075 116  — AUTO növekménye (-0 nincs) 
MVDFLG 0076 118 — Jelző: 10K grafikus képernyő allokált-e 
Z$P$TEMP 0077 119 Ideiglenes tároló (MOVSPR, MID$) 
HULP 0078 120 — számláló 
SYNTMP 0079 121 töltésnél segédváltozó 
DSDEC 007A-007C 122 DS$ leírója 
TOS 007D 125 — futási verem teteje 
RUNMOD 007F 127 parancs/program mód jelzője 
PARSTS 0080 128 DOS kiértékelő jelzője 
PARSTX 0081 129 
OLDSTK 0082 130 
COLSEL 0083 131 aktuális szín 
MULCO1 0084 182 
MULCO2 0085 133 
FGROUND 0086 134 
SCALE$X 0087-0088 135 
SCALE$Y 0089-0O0O8BA 137 
STOPNB 008B 139 PAINT megállási jelzője 
GRAPNT 008C-008D 140 — grafikus rutinhoz cím 
VTEMP1 008E 142 — grafikus rutinhoz segédregiszter 
VTEMP2 008F 143 — grafikus rutinhoz segédregiszter 
STATUS 0090 144 STATUS byte 
STKEY 0091 145 — STOP billentyű jelzője 
SVXT 0092 146 szalag segédváltozó 
VERCK 0093 147 LOAD vagy VERIFY jelző 
C3PO 0094 148 a soros kapu pufferénekjelzője 
BSOUR 0095 149 a soros kapu puffere 
SYNO 0096 150 kazetta szinkronizáció száma 
XSAV 0097 151 ideiglenes tároló BASIN-re 
LDTND 0098 152 index a logikai file-okhoz 
DFLTN 0099 153 default input eszköz 
DFLTO 009A 154 default output-eszköz 
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PRTY 009B 155 — kazetta paritás 

DPSW 009€C 156 kazetta kapcsoló 

MSGFLG 009D 157 operációs rendszer üzenet jelzője 
PTR1 009E 158 kazetta ideiglenes tároló 

PTR2 009F 159 kazetta ideiglenes tároló 

TIME 004A0-00A2 160 a 24 órás óra 1/60 másodpercekben 
R2D2 004A3 163 — soros busz használata: jelző 
BSOUR1 0044 164 — ideiglenes változó: soros busz használja 
COUNT 00A5 165 — ideiglenes változó: soros busz használja 
BUFPT 0046 166 kazetta mutató 

INBIT 00A7 167 RS232, kazetta 

BITCI 00A8 168 RS232, kazetta: olvasási hiba 
RINONE 00A9 169 RS232 

RIDATA 00AA 170 RS232, kazetta 

RIPRTY 00AB 171 RS232 pantás jelző tárolása 

SAL 00AC 172 képernyő görgetés 

SAH O0O0AD 173 

EAL 00AE-O0OAF 174 kazetta vég címe/ program vége 
CMPO 00BO 176 kazetta időzítő konstans 

TEMP 00B1 T/Z 

TAPE1 00B2-00B3 178 kazetta puffer címe 

BITTS 00B4 180 RS232 

NXTBIT 00B5 181 RS232 

RODATA 00B6 182 RS232 

FNLEN 00B7 183 aktuális file név hossza 

LA 00B8 184 aktuális logikai file szám 

SA 00B9 185 — aktuális másodlagos cím 

FA O0OBA 186 aktuális hardver szám 

FNADR 00BB-OBC 187 az aktuális filenévre mutat 

ROPRTY 00BD 189 RS232 

FSBLK 00BE 190 kazetta számláló 

DRIVE OOBF 191 soros busz puffer 

CAS1 00€C0O 192 kazetta billentyű érzékelés 

STA 00C1-00C2 193 I/O kezdőcím 

TMP2 00C€3-00C4 195 kazetta töltési állandó 

DATA 00€C5 197 kazetta irás/olvasás adat 

BA 00€6 198 az aktuális LDAD/SAVE/VERIFY művelet szelete 
FNBANK 00€7 199 az aktuális FN definíció szelete 
RIBUF 00C8-00C9 200 RS232 input puffer mutató 

ROBUF 00CA-OOCB 202 RS232 output puffer mutató 
KEYTAB 00C€CC-00CD 204 billentyűzet definíciók 

IMPARM 00CE-O0OCF 206 

NDX 00DO 208 index a billentyűzet pufferbe 
KYNDX 00D1 209 feldolgozatlan billentyű a pufferbe jelzője 
KEYIDX 00D2 210 mutató a billentyűzet pufferbe 
SHFLAG 00D3 211 SHIFT jelzője 

SFDX 00D4 212 aktuális billentyű indexe 

LSTX 00D5 213 — utolsónak olvasott billentyű kódja 
CRSW 00D6 214 SIxRETURN5 jelzője 

MODE 00D7 215 40/80 jelzője 
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GRAPHM 00D8 216 szöveges/grafikus kijelzés jelzője 
CHAREN 00D9 217 RAM/ROM VIC karakter jelzője (2. bit) 
KEYSIZ OODA 218 Funkciós billentyűk adatai 

KEYLEN O00DB 219 

KEYNUM 00DC 220 

KEYNXT 00DD 221 

KEYBNK 00DE 222 

KEYTMP O00DF 223 

PNT 00E0-00E1 224 mutató az aktuális sorba (szöveg) 
USER 00E2-00E3 226 mutató az aktuális sorba (attribútum) 
SCBOT 00E4 228 ablak alsó sora 

SCTOP 00E5 229 ablak felső sora 

SCLF 00E6 230 ablak bal széle 

SCRT 00E7 231 ablak jobb széle 

LSXP 00E8 232  INPUT kezdő oszlopa 

LSTP 00E9 233 — INPUT kezdő sora 

INDX 00EA 234 —INPUT sor vége 

TBLX 00EB 235 kurzor sora 

PNTR 00EC 236 kurzor oszlopa 

LINES 00ED 237 — a képernyő maximális sorainak a száma 
COLUMNS 00EE 238 a képernyő maximális oszlopainak a száma 
DXATAX 00EF 239 a rKkiírandó karakter 

LSTCHR 00FO 240 az utoljára kiírt karakter 

COLOR 00F1 241 a kiírandó karakter attribútuma 
TCOLOR 00F2 242 elmentett attribútum 

RVS 00F3 243 inverz kiírási mód jelzője 

OATWS 00F4 244 — idézőjel üzemmód jelzője 

INSRT 00F5 245 — beszúrási üzemmód jelzője 

INSFLG 00F6 246 — auto-beszúrási üzemmód jelzője 
LOCKS 00F7 247 SLSHIFT-C-5 és cCCTRL-S5Z letiltása 
SCROLL 00F8 248 letiltja a képernyő görgetést 

BEEPER 00F9 249 letiltja a CCTRL-G5-t 

FREKZP 00FA-OOFE 250 szabad terület 

LOFBUF 00FF 255 

FBUFFR 0100 256 — DOS filenév puffer (16 byte) 

XCNT 0110 272 DOS ciklusszámláló 

DOSFIL 0111 273 DOS filenév 1 hossz 

DOSDS1 0112 274 DOS lemezegység 1 

DOSF2L 0113 275 DOS filenév 2 hossz 

DOSDS2 0114 276 DOS lemezegység 2 

DOSF2A 0115-0116 2/2 DOS filenév 1: cím 

DOSOFL 0117-0118 279 BLOAD/BSAVE kezdő cím 

DOSOFH 0119-OTTA 281 BLOAD/BSAVE végcím 

DOSLA 011B 283 DOS logikai file szám 

DOSFA 011C 284 DOS egységszám 

DOSSA 011D 285 DOS másodlagos cím 

DOSRCL O11TE 286 DOS rekordhossz 

DOSBNK O11F 287 DOS szeletszám 
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DOSDID 
DIDCHK 


JMPFAR 


ESCFNVEC 
BNKVEC 
IERROR 
IMAIN 
ICRNCH 
IAPLOP 
IGONE 
IEVAL 
IESCLK 
IESCPR 
IESCEX 
ITIME 
IIRAa 
IBRK 
INMI 
IOPEN 
ICLOSE 
ICHKIN 


0120-0121 
0122 
0123 
0124 
0125 
0126 
0127 
0128 
0129 
0124 
012B 
012C 
012D 
012E 
012F 

0130 

0131 

0132 
0133 
0134 
0135 
0136 
0137-OTFF 
0200-02A1 


02A2-O2AE 
O2AA 
02AF-OZBD 
0289 
02BE-O2CC 
02C8 
02CD-02E2 
02E3-O2FB 


02FC-O2ZFD 
02FE-O2FF 
0300-0301 
0302-0303 
0304-0305 
0306-0307 
0308-0309 
0304A-030B 
030C€C-030D 
030E-030F 
0310-0311 
0312-0313 
0314-0315 
0316-0317 
0318-0319 
0314A-031B 
031C-031D 
031E-031F 


Operációs rendszer 


DOS ID byte-ok 

DOS ID jelző 

mutató a kezdő számhoz 

mutató a végszámhoz 

dollár jele 

vessző jele 

számláló 

az exponens előjele 

mutató az exponensre 

a tizedespont előtti jegyek száma 
jobbra igazítás jelzője 

a tizedespont előtti helyek száma 
a tizedespont utáni helyek száma 
4/- jelzője 

exponens mező jelzője 

kapcsoló 

karakter számláló 

előjel helye 

üres/csillag jelző 

mutató a mező kezdetére 

a formátum mező hossza 

mutató a mező végére 

rendszer verem 

rendszer input puffer 


LDA(-),Y tetszőleges szeletről 

indirekt vektor FETCH-hez 

STA(-),Y tetszőleges szeletre 

indirekt vektor STASH-hez 

CMP(-),Y tetszőleges szelettel 

indirekt vektor CMPARE-hez 

JSR xxxx tetszőleges szeletre és visszatérés 
JMP xxxx tetszőleges szeletre 


vektor további függvényekhez 

vektor funkcionális cartridge-hez 
vektor az X-ben levő hiba kiíratására 
vektor a rendszer ciklushoz 

vektor a tokenizáláshoz 

vektor a BASIC szöveg listázásához 
vektor a BASIC karakter értelmezéshez 
vektor a token kiértékeléshez 

vektor ESC tokenizáláshoz 

vektor ESC listázáshoz 

vektor ESC végrehajtáshoz 

TIME megszakítási vektor 

IROA RAM vektor 

BRK RAM vektor 

NMI RAM vektor 

KERNAL: OPEN 

KERNAL: CLOSE 

KERNAL: CHKIN 
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ICKOUT 0320-0321 800 KERNAL: CHKOUT 

ICLRCH 0322-0323 802 KERNAL: CLRCHN 

IBASIN 0324-0325 804 KERNAL: CHRIN 

IBSOUT 0326-0327 806 KERNAL: CHROUT 

ISTOP 0328-0329 808 KERNAL: STOP 

IGETIN 032A-032B 810 KERNAL: GETIN 

ICLALL 032C-032D 812 KERNAL: CLALL 

EXMON 032E-0O32F 814 KERNAL: monitor belépési pont 
ILOAD 0330-0331 816 KERNAL: LOAD 

ISAVE 0332-0333 818 KERNAL: SAVE 

CTLVEC 0334-0335 820 Szerkesztő: CTRL végrehajtása 
SHFVEC 0336-0337 822 Szerkesztő: SHIFT végrehajtása 
ESCVEC 0338-0339 824 Szerkesztő: ESCAPE végrehajtása 
KEYVEC 033A-033B 826 Szerkesztő: billentyűzet olvasása 
KEYCHK 033C-003D 828 Szerkesztő: billentyűzet tárolása 
DECODE 003E-0049 830 vektorok a billentyűzet dekódolására 
KEYD 034A-0353 842 billentyűzet puffer 

TABMAP 0354-035D 852 TAB-ok jelzése 

BITABL 035E-0361 862 a sorok láncolását jelző bitek 
LAT 0362-036B 866 logikai file számok 

FAT 036C-0375 876 — hardver egységszámok 

SAT 0376-0O37F 886  — másodlagos címek 

CHRGET 0380-039E 896 CHRGET rutin 

CHRGOT 0386-039E 902 CHRGOT rutin 

ANUM 0390-039E 912 ONUM rutin: Z-bit magas ha $00 vagy $3A 


C-bit magas ha számjegy 


ISUBRO 039F-0O3D1 927 RAM rutinok 

ZERO 03D2-03D4 977 konstans a BASIC-hez 

CURR$BANK 03D5 979 SYS, POKE,PEEK szelete 

TMPDES 03D6-03D9 980 — az INSTR függvény segédregiszterei 

FIN$BANK 03DA 984 memóriaszelet a sztring/lebegőpontos szám kon 
vertáló rutinhoz 

SAVSIZ 03DB-O3ZDE 985 ideiglenes változó a SPRSAV-hez 

BITS 03DF 989 FACH1 túlcsordulás jelző 

SPRTEMP1 03E0 990 SPRSAV 

SPRTEMP2 03E1 991 SPRSAV 

FG$BG 03E2 992  előtér/háttér színe 

FG$MC1 03E3 993 előtér/több szín$1 

VICSCN 0400-O7FF 1024 képernyő memória 

BRSTACK 0800-O9FF 2048 BASIC futási verem 

SYS$VEC 04A00-04A01 2560 vektor: BASIC meleg indítás 

DEJAVU 0A02 2562 KERNAL inicializáló jelző byte 

PALNTS 04A03 2563 PAL/NTS jelzőbyte 

INSTAT 04A04 2564 jelző: RESET vagy NMI 

MEMSTR 04A05-0A06 2565 mutató a 15-ös szeleten elérhető legalacsonyabb 
memóriára 

MEMSIZ 04A07-0A08 2567 mutató a 15-ös szeleten elérhető legalacsonyabb 
memóriára 
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IRATMP 
CASTON 
KIKA26 
STUPID 
TIMOUT 
ENABL 


MS1CTR 
M51CDR 
M51AJB 
RSSTAT 
BITNUM 
BAUDOF 
RIDBE 
RIDBS 
RODBE 
RODBS 
SERIAL 
TIMER 


XMAX 
PAUSE 
RPTFLG 
KOUNT 
DELAY 


LSTSHF 
BLNON 
BLNSW 
BLNCT 
GDBLN 
GDCOL 
CURMOD 
VM1 


VM2 
VM3 


VM4 


LINTMP 


SAV80A 
SAVBOB 
CURCOL 
SPLIT 
FNADRX 
PALCNT 
SPEED 


SPRITES 


04A09-OAOA 
O0AOB 
0AO0C 
O0AOD 
O0AOE 
OAOF 


0A10 

0A11 
04A12-0A13 
04A14 

04A15 
0A16-0A17 
0A18 

04A19 
0A1A 
0A1B 
0A1C 
0A1D 


0A20 
0421 
04A22 
0423 
0424 


0425 
04A26 
04A27 
0428 
04A29 
0A2A 
0A2B 
O0A2C 


0A2D 
OAZE 


OAZ2F 


0430 


0431 
0432 
0433 
0434 
0435 
0436 
0437 


04A38 


2569 
2571 
2572 
2573 
2574 
2755 


2576 
2577 
2578 
2580 
2581 
2582 
2584 
2585 
2586 
2587 
2588 
2589 


2592 
2593 
2594 
2595 
2596 


2597 
2598 
2599 
2600 
2601 
2602 
2603 
2604 


2605 
2606 


2607 


2608 


2609 
2610 
2611 
2612 
2613 
2614 
2615 


2616 


Operációs rendszer 


a kazettás egység ide menti a RAM IRO vektort 
kazetta 

kazetta olvasás 

kazetta olvasás 

gyors adatátvitel időtúllépés 

RS232 megengedése 


RS232 kontroll regiszter 

RS232 parancs regiszter 

RS232 felhasználó által definiált sebesség 
RS232 statusz regiszter 

RS232 elküldendő bitek száma 
RS232 teljes idő 

RS232 input puffer mutató: vége 
RS232 input puffer mutató: eleje 
RS232 output puffer mutató: vége 
RS232 output puffer mutató: eleje 
gyors átvitel jelzője 

az óraregiszter módosító értéke 


a billentyűzet puffer hossza 

SICTRL-S5 jelzője 

billentyűzet ismétlésének engedélyezése 
várakozás a billentyűzet ismétlésére 

várakozás míg a billentyű lenyomottnak tekinten 
dő 

cxaC--SHFT5 váltás közti várakozás 

40 oszlopos képernyő: kurzor mód 

40 oszlopos képernyő: kurzor letiltása 

40 oszlopos képernyő: villogáshoz számláló 

40. oszlopos képernyő: karakter villogás előtt 

40 oszlopos képernyő: szín villogás előtt 

80 oszlopos képernyő: kurzor mód 

40 oszlopos képernyő: képernyő memória kezdete, 
felső byte 

bittérkép kezdete, felső byte 

80 oszlopos képernyő: képernyő memória kezdete, 
felső byte 

80 oszlopos képernyő: attribútum memória kezde 
te, felső byte 


80 oszlopos képernyő 

80 oszlopos képernyő 

80 oszlopos képernyő: kurzor színe villogás előtt 
40 oszlopos osztott képernyő: raszter szám 

X regiszter tárolása szelet műveletek alatt 

PAL számláló 

a rendszer sebességének tárolása kazetta és so 
ros műveletek alatt 

sprite-ok megengedésének tárolása 
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BLANKING 0439 2617 
HOLDOFF OA3A 2618 jelző a VIC chip teljes kontroljára 
LDTBISA 0A3B 2619 a VIC képernyő felső byte-ja képernyő mozgatá 
sakor 
CLREALO 0A3C 2620 8563 karakter feltöltés 
CLREAHI 0A3D 2621 8563 karakter feltöltés 
0A40-OA7F 2624 40/80 oszlopos képernyő esetén ideiglenes tároló 
terület 
XCNT 04A80-OA9F 2688 összehasonlításhoz puffer 
HULP 0AA0O 2720 
FORMAT O0AAA 2730 
LENGTH O0AAB 2731 assembler 
MSAL 0AAC-OAAE 2732 assembler 
SXREG OAAF 2735 ideiglenes tárolás 
SYREG O0AAF 2736 ideiglenes tárolás 
WRAP 0ABO 2737 assembler: ideiglenes tárolás 
XSAVE 0AB1 2738 indirekt szubrutinhíváskor X tárolása 
DIRECT "0AB3 2739 AT monitor parancs esetén a másolás iránya 
COUNT 0AB4 2740 parancsfelismerő (monitor) 
NUMBER 0AB5 2741 parancsfelismerő (monitor) 
SHIFT 0AB6 2742 parancsfelismerő (monitor) 
TEMPS 0AB7-OABF 2743 
CURBNK 0ACO 2753 ROM száma az aktuális funkcionális cartridge-hez 
PAT 0AC1-OAC4 2753 a cartridge-ok fizikai címei 
DK$FLAG 0AC5 2757 idegen nyelvű szerkesztő 
0AC6-OAFF 2758 foglalt 
TBUFFER 0B0O0-OBFF 2810 kazetta puffer(192) byte; auto-boot terület 
RS2321 0€C00-OCFF 3072 RS232 input puffer 
RS2320 0D00-ODFF 3328 RS232 output puffer 
0E00-OFFF 3584 sprite definíciós terület 
PKYBUF 1000-1009 4096 cF.5 billentyűkre definiált szövegek hossza 
PKYDEF 100A-10FF 4106 CF.5 billentyűkhöz rendelt szövegek 
DOSSTR 1100-1130 4352 DOS parancssztring puffer; 48 byte és a hossz 
VWORK 1131 4401 grafikus változó 
XYPOS 1131-1132 4401 
XPOS 1131-1132 4401 grafika: X koordináta 
YPOS 1133-1134 4403 grafika: Y koordináta 
XDEST 1135-1136 4405 grafika: X koordináta, tárgy 
YDEST 1137-1138 4407 grafika: Y koordináta, tárgy 
XYABS 1139-113A 4409 grafika: vonal rajzolásához ugyanazok 
XABS 1139-113A 4409 
YABS 1138-113C 4411 
XYSGN 113D-113E 4413 
XSGN 113D-113E 4413 
YSGN 113F-1140 4415 
FCT 1141-1144 4417 faktor 
ERRVAL 1145-1146 4421 hiba 
LESSER 1147 4423 kisebb végpont 
GREATR 1148 4424 nagyobb végpont 
ANGSGN 1149 4425 a szög előjele 
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SINVAL 114A-114B 4426 a szög szinusza 

COSVAL 114C-114C 4428 a szög koszinusza 

ANGCNT 114E-114F 4430 ideiglenes 

XCIRCL 1150-1151 4432 kör középpontja, X koordináta 

YCIRCL 1152-1153 4434 kör középpontja, Y koordináta 

XRADUS 1154-1155 4436 az ellipszis X irányú féltengelye 

YRADUS 1156-1157 4438 az ellipszis Y irányú féltengelye 

ROTANG 1158-115B 4440 a forgatás szöge 

ANGBEG 115C€-115D 4444 kezdő szög 

ANGEND 115E-115F 4446 végső szög 

XRCOS 1160-1161 4448 X féltengely " COS(forgatás szöge) 

YRSIN 1162-1163 4450 Y féltengely " SIN(forgatás szöge) 

XRSIN 1164-1165 4452 X féltengely " SIN(forgatás szöge) 

YRCOS 1166-1167 4454 Y féltengely " COS(forgatás szöge) 

CHRPAG 1168 4456 A CHAR BASIC utasításhoz a karaktergenerátor 
felső byte-ja 

BITCNT 1169 4457 GSHAPE ideiglenes tároló 

SCALEM 116A 4458 skála mód jelzője 

WIDTH 116B 4459 dupla szélesség jelzője 

FILFLG 116C 4460 BOX parancsnál a festés jelzője 

BITMSK 116D 4461 ideiglenes tároló 

NUMCNT 116E 4462 

TRCFLG 116F 4463 nyomkövetési üzemód jelzője 

RENUMT1 1170-1171 4464 RENUMBER használja 

RENUMT2 1172-1173 4466  RENUMBER használja 

T3 1174 4468 

T4 1175-1176 4469 

VTEMP3 1127 4471 grafika 

VTEMP4 1178 4472 

VTEMP5 1179 4473 

ADRAY1 117A-117B 4474 mutató: lebegőpontos -5 egész konverzió 

ADRAY2 1178-117C 4476 mutató: egész -5 lebegőpontos konverzió 

SPRITDAT 117E-11D5 4478 sprite sebesség/irány táblázat 

VICSAVE 11D6-11EA 4566 VIC 21 regiszterének elmentése 

UPLOW 11EB 4587 mutató: kisbetű/nagybetű karakterkészlet a CHAR 
parancsnak 

UPGRAPH 11EC 4588 mutató:  nagybetűk/grafikák karakterkészlet a 
CHAR parancsnak 

DOSSA 11ED 4589 

OLDLIN 1200-1201 4608 előző BASIC sor száma 

OLDTXT 1202-1203 4610 mutató CONT parancshoz 

PUFILL 1204 4612 USING szóköz karakter 

PUCOMA 1205 4613 USING ezredes jel 

PUDOT 1206 4614 USING tizedes jel 

PUMONY 1207 4615 USING pénzjel 

ERRNUM 1208 4616  hibarutin: hiba kódszáma 

ERRLIN 1209-120A 4617  hibarutin: BASIC sorszám ($FFFF - nincs hiba) 

TRAPNO 1208-120C 4619 ON ERROR hibarutin címe ($FFxx -— nincs) 
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TMPTRP 120D 4621 

ERRTXT 120E-120F 4622 mutató: hiba szövege 
TEXTTOP 1210-1211 4624 mutató: szöveg tetejére 
MAXMEMO 1212-1213 4626 RAM 0-ban BASIC által használható legnagy. cím 
TMPTXT 1214-1215 4628 DO-LOOP: ideiglenes tároló 
TMPLIN 1216-1217 4630 

USRPOK 1218 4632 USR BASIC függvény: JMP kódja 
USRADR 1219-1214A 4633 USR címe 

RNDX 1218B-121F 4635 RND függvény 

CIRSEG 1220 4640 kör rajzolásnál a következő pont szögtávolsága 
DEJAVU 1221 4641 inicializálás jelzése 

TEMPO 1222 4642 

VOICES 1223-1228 4643 

NTIME 1229-1224A 4649 

OCTAVE 122B 4651 

SHARP 122C 4652 

PITCH 1220D-122E 4653 

VOICE 122F 4655 

WAVEO 1230-1232 4656 

DNOTE 1233 4659 

FLTSAV 1234-1237 4660 

FLTFLG 1238 4664 

NIBBLE 1239 4665 

TONNUM 123A 4666 

TONVAL 1238B-123D 4667 

PARCNT 123E 4668 

ATKTAB 123F-1248 4669 

SUSTAM 1249-1252 4681 

WAVTAB 1253-125C 4691 

PULSLW 125D-1266 4701 

PULSHI 1267-1270 4710 

FILTERS 1271-1275 4725 


1276-1280 4726 megszakítások 
1281-128B2 4737 BASIC hanggenerálás használja 


WINDTMP 128B3-12B6 4787 ablak kezelés: ideiglenes 

SAVRAM T28Z-12F9 4791 SPRDEF és SAVSPR használja 

DEFMOD 12FA 4858 SPRDEF és SAVSPR mód 

LINCNT 12FB 4859 SPRDEF és SAVSPR használja 

SPNUM 12FC 4860 SPRDEF és SAVSPR használja 

IRAWFLG 12FD-12FF 4861 BASIC megszakítás kezelés 
1300-17FF 4864 szabad terület 


1800-1C00 6144 funkcionális ROM-ok számára foglalt terület. Ha 
nincs, szabad ; 


RAMBOT 1C00 7168 BASIC munkaterület ($1C00-$EFFF) 
1C00 7168 grafika: színmemória; $1C00-$1FFF 
2000 8192 grafika: bit térkép; $2000-$3FFF 
4000 16384 C128 BASIC ROM; grafikánál a BASIC terület eleje 
($4000-$EFFF) 
8000 32768 C128 BASIC ROM (második rész) 
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9. fejezet 


A 1570/71-es lemezegység használata 


9.1 Bevezetés 


A Commodore 128-as mikrogépcsaládhoz a Commodore cég - előző lemezegységeitől 
teljesen eltérő lemezegységeket fejlesztett ki. Az új, 1570 illetve 1571 típusjelű 
lemezegységek a Commodore 1541-essel írt lemezegységek olvasásán túl képesek az 
MFM formátumú lemezek olvasására is. Ezen túlmenően a számítógép és a 
lemezegység közti adatátvitel két különböző formában történhet. A másik adatátviteli 
protokol egy sokkal gyorsabb - hardver úton megvalósuló - adatátvitelt biztosít. Az 
1570-es és az 1571-es lemezegységek mndenben megegyeznek, kivéve, hogy az 1570- 
es egyoldalas, míg a 1571-es kétoldalas adatrögzítésre képes. 


A 1570/71-es lemezegység csatlakoztatható a Commodore 64, a Plus 4, a Commodore 
16 számítógépekhez is, s használható a Commodore 128 C-64-es üzemmódjában. 
Ezekben az esetekben azonban a lemezegység sajátosságai nem használhatók ki, mert 
az MFM formátumú lemezek vagy a gyors adatátvitel használatához a Commodore 128 
által biztosított hardver lehetőségekre is szükség van (lásd 9.2)! 


A 1570/71-es lemezegységek két üzemmódban dolgoznak. Az első 1571-esnek nevezett 
üzemmódban a lemezegység valamennyi lehetőséget kihasználhatjuk, míg a második, 
un. 1541-es üzemmódban csak azokat, amelyekre egy 1541-es egység képes. 


Attól függően, hogy hogyan és milyen sorrendben kapcsoltuk be a számítógépet és a 
lemezegységet, a 1571-es lemezegység vagy 1541-es vagy 1571-es üzemmóddal indul 
el. 


a/ Először a lemezegységet kapcsoljuk be, azután a Commodore 128-at. Ebben az 
esetben a gép C-128-as, a lemezegység 1571-es üzemmódba kerül. 


b/ Először a számítógépet kapcsoljuk be, majd miután a rendszer bejelentkezett, a 
lemezegységet. Ebben az esetben a gép C-128-as, a lemezegység 1541-es üzemmódba 
kerül. Amikor azonban az első lemezegységnek szóló utasítást elküldjük, az egység 
automatikusan 1571-es üzemmódba lép át. Ha azt akarjuk, hogy 1541-es üzemmódban 
maradjon, akkor a 


PRINT$15,/U0O53 MO" 


parancsot kell elküldeni az előzőleg már megnyitott 15-ös logikai számú 
parancscsatornán. (Részletesen lásd a 9.3 részben.) 


c/ Először a lemezegységet kapcsoljuk be, majd a számítógépet, s a rendszer 
bejelentkezése után kiadjuk a GO64 parancsot. Ezzel a gép C-64-es, a lemezegység 
1571-es üzemmódba kerül. Ebben az esetben a 1571-es egység mindkét oldalát tudjuk 
C-64-es üzemmódban is olvasni, különben a lemezegység pontosan olyan, mintha 
1541-es lenne. 


d/ Bekapcsoljuk a lemezegységet, majd a C€C-5 billentyű lenyomva tartása közben 
bekapcsoljuk a számítógépet. Ezzel a gép C-64-es, a lemezegység 1541-es üzemmódba 
tér át. 
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A 1570/71-es lemezegységhez tartozó DEMO lemezen találhatunk egy DOS SHELL 
elnevezésű programot, amelyik nagy mértékben megkönnyíti a lemezes file-ok 
kezelését. Erről részletesen a 9.4 részben szólunk. 


A 1571-es lemezegységnek van egy óriási hátránya: még 1541-es üzemmódban sem 
kompatibilis a 1541-es lemezegységgel, így például a Commodore 64/1541-es 
párosításra kidolgozott gyorsmásolók és töltők legtöbbje nem működik megfelelően. 
Magam egyetlen másoló programot találtam, amelyiket a Commodore 128-as C-64-es 
üzemmódjában a 1571-essel is lehetett használni! 


A védett lemezek beolvasásával szerencsére nincs probléma. A 1571-es időzítesei - ha 
1541-es üzemmódban használjuk - megegyeznek a 1541-es időzítéseivel, ezért a 
legjobban védett lemezek is probléma nélkül olvashatók segítségével. Ennek ellenére az 
a véleményem, hogy nem nélkülözhetünk egy igazi 1541-es lemezegységet sem. 


9.2 A 1570/71-es hardver felépítése 


A 1571-es lemezegység - hasonlóan elődjeihez - Mostek 6502a alapú, s periféria 
chipnek két 65C22A chipet tartalmaz. Az egyik a lemezegység fizikai vezérlését végzi, a 
másik segítségével kommunikál a rendszer a számítógéppel. Mindkét lemezegység 
32Kbyte ROM-ot és 2Kbyte RAM-ot tartalmaz. 


A 1570 egyetlen, míg a 1571 két darab kombinált író-olvasó fejet tartalmaz. Ennek 
segítségével mind GCR (group code recording) mind MFM (modified freguency 
modulation) formátumú lemezek olvashatók. A két formátum esetén a lemez tároló 
kapacitása is eltér. 


GCR formátum Lemezegység 
1570 1571 
Formázatlan kapacitás (byte) 252019 252019x2 
Formázott kapacitás (byte) 174848 349696 
Legnagyobb SEC file (byte) 168656 337312 
Legnagyobb REL file (byte) 167132 167132 
maximális rekordszám 65535 65535 
File-ok száma 144 144 6 
Sávok (tracks) száma 35 70 
Szektorok sávonként 17-21 17-21 
Blokkok száma - . összes 683 1366 
szabad 664 1328 
Byte-ok egy blokkban 256 256 
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MFM formátum 


Formázatlan kapacitás 250000 (oldalanként) 
Formázott kapacitás 

Szektorméret 128 133120 (oldalanként) 

Szektorméret 256 163840 (oldalanként) 

Szektorméret 512 184320 (oldalanként) 

Szektorméret 1024 204800 (oldalanként) 
Sávok (tracks) száma 40 (oldalanként) 
Szektorok száma sávonként 

Szektorméret 128 26 

Szektorméret 256 16 

Szektorméret 512 9 

Szektorméret 1024 5 


GCR formátumú adattárolás 


A GCR formátumot elsősorban a Commodore cég használja a gépeihez gyártott 
lemezegységek — esetén. A 1541/1551/1570/1571-es — lemezegységek — standard 
formátumának ez számít. A GCR formátum a sávokat kivülről befelé számozza 1-től 35- 
ig, illetve kétoldalas egység esetén 36-tól 70-ig. Az adatrögzítés jellemzője, hogy a 
külső sávokban több blokkot ír mint a belsőben, ezzel is bővítve a tárolási kapacitást. 
Az egyetlen blokkba elhelyezett adatok - túl az információt hordozó 256 byte-on az 
alábbiak: 


Index 


FA 


sz al 3 N 
TEJE TETETEE TESTET EE Es ET 
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Az egyes részek jelentése az alábbi: 


SYNC1 - 40 "1-es bit (a maximális írási sűrüséggel) 

08 - A lemezegység ID-jét azonosító jelsorozat 

CS1 - az ID1!D2/ TRACK SECTOR értékek ellenőrző összege 

SECTOR  - a szektor száma 

TRACK - a blokkot tartalmazó sáv száma 

ID1,1D2 - a lemez két karakteres azonosítója, amelynek értéke minden blokkba be- 
íródik 

GAP1 - 72 GCRO bit vagy 9 darab 01010101 

SYNC2 - 40 "V-es bit 

07 - az adatmező azonosítója 

CSs2 - a 256 adatbyte ellenőrző összege 

GAP2 - GCR 0-kból álló változó hosszúságú adatrész. Függ a formázás sebessé- 
gétől. Az első és utolsó blokk közti rész nagysága eltérhet, a többi min- 
dig ugyanaz. 


MFM formátumú adattárolás 


Az MFM formátumú tárolás több vonatkozásban is eltér a GCR formátumútól. Az MFM 
formátum esetén a szektor mérete és ezzel együtt az egy sávon levő szektorok száma 
változhat. (Ezért a szektor bevezető információja sokkal több adatot kell, hogy 
tartalmazzon!) Az MFM formátum a lemezen levő index lyukat használja az első szektor 
azonosítására. 


em Fal "9 s e 42 E 
vs a 
tnelsd ését] tés den) ádáseii szátet] kateá [a 
-- egg szett tl 


- . 


sdá T Azonosító Tész Adattároló rész — Si 


Indenxlyuk érzékelése 


Az egyetlen szektorban elhelyezett adatok jelentése az alábbi: 


Gap - Az azonosító, illetve az adatrészek közt elhelyezett részek 
SYNC - 6 nulla byte 
AM1 - az azonosító rész bevető információja 
$fe 5 adat 
$c7 z óra 
ID - négy byte, amelyik a szektor paramétereit adja meg 


m cilinder szám (00-4a) 

z fej száma 
00 : első lemezoldal (vagy egyoldalas lemez) 
01 : második lemezoldal 
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z szektor sorszáma 
01-1A : szektorméret 128 
01-Of : szektorméret 256 
01-09 : szektorméret 512 
01-05 : szektorméret 1024 
z szektorméret 
00 : 128 byte 
01 : 256 byte 
02 : 512 byte 
03 : 1024 byte 
CRC1I  - ellenörző összeg 
AM2 - az adatmező azonosítója 
$fb - adat 
$f8 - kontroll mező 
CRC2  - ellenörző összeg 


MFM formátumú lemezek esetén a sávok számozása 0-tól 39-ig tart. A szektorok 
számozása - eltérően a GCR formátumtól - 1-gyel kezdődik, s a szektormérettől 
függően az 5.9,15 vagy 26 értékekig tart. 


A gyors adatátvitel 


A Commodore 64 számítógép a perifériákkal való kommunikációra három - TTL szintű, 
szoftverből kezelt vonalat használt - az ATN, a CLK és a DATA vonalakat. A 1570/71-es 
lemezegységek az SRA vonalat használják, ami egy hardver irányított gyors órajelként 
működik. Ez a vonal a CIA$1 órajelével kötődik össze, s ennek ütemére shiftelődnek be 
(illetve ki) az adatok a CIA$1 chip soros kapujába (kapujából). A soros kapu pufferelt, 
ezért az adat feldolgozása elvégezhető, miközben a másik adat átvitele - a hardver által 
vezérelt módon - megtörténik. 


A soros kapu működésének jellemzője, hogy adatkivitel esetén a saját órajelét 
használja, míg adatbevitel esetén kívülről várja az órajelet. A megfelelő vonalak 
összekötését az MMU 5. regiszterének ($D505) 3. bitje vezérli. Ha ez magas, akkor a 
soros kapu a belső órát használja, tehát kimenetnek használható. Ha a bit alacsony, 
akkor a rendszer külső órajelt vár. 


C-64-es üzemmódban az MMU chip nincs a rendszerben, ezért - szemben pl. a 80 
oszlopos videochippel - nem használhatjuk a gyors adatátvitelt. 


A gyors adatátvitelt maga az operációs rendszer használja. Ha C-128-as üzemmódban 
vagyunk, akkor a programok töltése és mentése az új adatátvitel szerint történik. 
Hasonlóan a CP/M BIOS rutinok úgy vannak kiképezve, hogy a gyors adatátvitelt 
használják. 


C-128-as üzemmódban a OPEN, CLOSE, INPUT$, GET$, PRINT$ parancsok nem 
használhatók csak GCR formátumú lemezekre. Hasonlóan a közvetlen írási/olvasási DOS 
parancsok (B-R, B-W stb.) csak GCR formájú lemezeket olvasnak. 


A 1570/71-es lemezegység egy sor új DOS parancsot tartalmaz, amelyek segítségével 
az MFM formátumú lemezek olvasása/írása, illetve a gyors adatátvitel megvalósítható. 
Ezeknek a parancsoknak a használatához azonban gépi kódú rutinokat kell írnunk, 
amelyek a gyors adatátvitelt C-128 módban megvalósítják, mert a KERNAL rutinok 
ilyeneket nem tartalmaznak. Egy lehetséges megvalósítást a 9.5 fejezetben mutatunk be. 
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9.3 A lemezegység BCIS utasításai 


A 1570/71-es lemezegység - a 1541-es lemezegységhez képest - egy új utasításcso- 
porttal, a BCIS utasításokkal bővül ki. A BCIS (Burst Command Instruction Set) a gyors 
átviteli parancsokat tartalmazza. Ezen túl ezekkel a parancsokkal 
írhatjuk/olvashatjuk/formázhatjuk az MFM formátumú lemezeket. 


A BCIS parancsokat ugyanúgy kell kiadnunk, mint az összes többi parancsot, tehát a 
15-ös csatornán keresztül. A különbség csupán annyi, hogy a legtöbb BCIS parancs 
kiadása után a lemezegység és a Commodore 128 közt a gyors protokoll szerinti 
adatcserét kell lebonyolítanunk. S ez nemcsak az adatátvitelre, hanem a lemezegység 
állapotára vonatkozó információkra is igaz. 


Ebben a részben a BCIS utasításkészletét ismertetjük. Alkalmazására egy összetett 
példát a 9.5 részben mutatunk be. 


Burst Read 

A parancs segítségével a lemez és a számítógép közt gyors adatátvitelt valósíthatunk 
meg. A lemezegység a parancsban megadott számú szektort olvas a pufferébe, s küldi 
el az adatokat - a gyors protokoll szerint - a C-128-nak. Minden egyes szektor átvitele 
előtt egy status byte-ot küld el a számítógépnek. 


Az olvasási parancs kiadása előtt a lemezt be kell léptetni a rendszerbe vagy az 
INOUIRE DISK vagy a OUERY DISK FORMAT paranccsal! 


Bit 

Byte 7 6 5 4 3 2 1 o 

[0] 0 1 o . (0) 1 o 1 

1 0 [0 1 1 o [0] 0 0 

2 TT E B S 0 0 0 N 

3 Az olvasandó sáv száma 

4 Az olvasandó szektor száma 

5 Szektorok száma 

6 Következő sáv (opcionális) 
A parancs második byte-ja adja meg az olvasás módját: 
T - adatátvitel (1-nincs adatátvitel) 
E - hibák figyelmen kívül hagyása (1-a hibás byte-okat is elküldi) 
B - csak a bufferba olvas (1-igen) 
S - lemezoldal (csak MFM formátum esetén) 
N - meghajtó száma. 1570/71 esetén - 0 
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Példák: 
(1) PRINT$15,"UO"CHR$(0):CHR$( 1): CHR$(1);CHR(3) 
(1) PRINT 15,7U0O7;CHR$(16):CHR$(1);CHR$(1);CHR(3) 


Az (I) példa hatására a lemezegység 1 sávjának 1 szektorától 3 szektor olvasása 
történik meg. Az olvasást a gyors adatátviteli protokoll szerint kell elvégezni. Az 
átvitelre került byte-ok száma függ attól, milyen (GCR, MFM) formátumú lemezt 
használunk. jé 


A (II) példában egy MFM formátumú lemez hátoldalának 1 sávjának 1 szektorától 
olvasunk 3 szektort. Ha ugyanezt GCR formátummal szeretnénk elvégezni, akkor a 


PRINT 15,7UO"/CHR$(0):CHR$(36):CHR$(1):CHR(3) 


parancsot kell kiadni. 


Burst Write 

A parancs segítségével a lemez és a számítógép közt gyors adatátvitelt valósíthatunk 
meg. A lemezegység a parancsban megadott számú szektort kap a C-128-tól - a gyors 
protokoll szerint - s írja a megadott szektorokba. Minden egyes szektor átvitele után 
egy status byte-ot küld el a számítógépnek. 


Az írási parancs kiadása előtt a lemezt be kell léptetni a rendszerbe vagy az INOUIRE 
DISK vagy a OUERY DISK FORMAT paranccsal! 


Bit 

Byte Z 6 5 4 3 2 1 o 
(0) 1 10) 1 (0) 1 [0 1 
[0 0 1 1 0 o [0 [0 
HA E B S o o 1 N 


Az írandó sáv száma 

Az írandó szektor száma 
Szektorok száma 
Következő sáv (opcionális) 


O9NAGWGNRND A 


A parancs második byte-ja adja meg az írás módját: 

1. — adatátvitel (1-nincs adatátvitel) 

E - hibák figyelmen kívül hagyása (1-a hibás byte-okat is elküldi) 
B 

S 


: 


csak a bufferba olvas (1-igen) 
- lemezoldal (csak MFM formátum esetén) 


N - meghajtó száma. 1570/71 esetén - 0 

Példák: 

(1) PRINT$15,"UO"CHR$(2):CHR$(1):CHR$(1):CHR(3) 
(11) PRINT$15,/U0O7"CHR$(18).CHR$(1):CHR$(1):CHR(3) 
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Az (I) példa hatására a lemezegység 1 sávjának 1 szektorától 3 szektor írása történik 
meg. Az írást a gyors adatátviteli protokoll szerint kell elvégezni. Az átvitelre került 
byte-ok száma függ attól, milyen (GCR, MFM) formátumú lemezt használunk. 


A (II) példában egy MFM formátumú lemez hátoldalának 1 sávjának 1 szektorától írunk 3 
szektort. Ha ugyanezt GCR formátummal szeretnénk elvégezni, akkor a 


PRINT $15,"UO"CHR$(2):CHR$(36):CHR$( 1): CHR(3) 
parancsot kell kiadni. 
INOUIRE DISK 
A parancs segítségével lekérdezhetjük, hogy a lemezegységben milyen lemez is van. A 
parancs egyben arra is alkalmas, hogy segítségével beléptessük a lemezt a rendszerbe. 


A parancs kiadása után a lemezegység egyetlen status byte-ot küld - a gyors átviteli 
protokoll szerint. 


Bit 

Byte VA 6 5 4 iG ) 2. 1 0 
0 1 0 1 0 1 o 1) 

1 0 [0 1 1 [0] o o o 

X xX X S [0 1 o N 

Az egyes bitek jelentése: 

Xx - érdektelen j 

S - lemezoldal (csak MFM formátum esetén ) 

N - meghajtó (1570/71 esetén —- 0) 

Példák: 

(1 PRINT$ 15, "UO";CHR$(4) 


A fenti parancs egyrészt belépteti a lemezt a rendszerbe, másrészt egyetlen status 
byte-ot küld válaszul, ami a lemezre vonatkozó legszükségesebb információt 
tartalmazza. 


FORMAT MFM 

A parancs segítségével lehetőségünk van MFM formátumú lemezek formázására. Az 
MFM formátumnál elmondottak alapján még ezen belül is különböző lehetőségeink 
vannak. Ezeket a paraméterek megadásánál magunk is kiválaszthatjuk. Lehetőség van a 
lemez részleges megformázására is. 


A parancs semmilyen output információt sem ad. Ha a megformázott lemezt használni 


akarjuk, akkor az INOUIRE DISK vagy a OUERY DISK FORMAT paranccsal be kell léptetni 
a rendszerbe. 
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Bit 
Byte : llnS : LéllBE . elle ös So SZRG RE 
0 o 1 o úÚ o 1 10 o j ! 
1 o 0 1 j o 0 0 0 
2 P l D c] (0) 1 1 N 
3 1 3 logikai kezdő szektor 
4 eltolás (0) 
5 szektorméret(01 - 256 byte) 
6 utolsó sáv (39) 
7 szektorok száma (15) 
8 logikai kezdő sáv (0) 
9 kezdő sáv eltolás (0) 
10 töltő byte ($e5) 
11-? szektor tábla 


Az egyes paraméterek jelentése a következő: 
P - részleges formázás (1-igen) 

l - AM1 és AM2 jelek írása (1-igen) 

D - kétoldalas lemez (1-igen) 
S 

nk 


oldal kiválasztása 
- szektor tábla mellékelve (1-igen) 


N - meghajtó száma 

Példák 

hm PRINT£15, "UO";CHR$(64-42) 

(II) PRINT415, "UO":CHR$(64--32-44-2):CHR$(128):CHR$(0):CHR$(02); 


CHR$(39),CHR$(9);CHR$(0):CHR$(0):CHR$(DEC("E5")) 


Az első példa a lemez formázására a default paramétereket használja. Ennek 
megfelelően egyoldalas, 256 byte-os szektorokból álló MFM formátumú lemezeket 
kapunk. 


A második példa kétoldalas, 512 byte-os szektorokból álló (sávonkánt 9 szektor) lemezt 
formáz meg. Ez a fizikai formátuma az IBM PC-ken használt kétoldalas, 9 szektoros 
lemezeknek is. 


FORMAT GCR 

A parancs segítségével GCR formátumra formázhatunk meg egy lemezt. A különbség 
az, hogy a lemezre nem íródik fel sem a tartalomjegyzék, sem a BAM. Ezért ezek a 
lemezek a C-128 szokásos utasításaival (DLOAD, DSAVE stb.) nem használhatók! 


A parancs semmilyen output információt nem szolgáltat.: 
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Bit 

Byte 774/8a e Bo MVT d ÁT JÓ 
[0] 0 1 o A [0] 1 0 1 
1 0 [0] 1 1 [0] 0 0 10) 
2 X X pa X [0 1 ű N 
6) o X X X X X X X 
4 ID alsó byte 
5 ID felső byte 

Xx - érdektelen 

N - meghajtó száma (1570/71 esetén - 0) 


SECTOR INTERLEAVE 

A parancs segítségével a többszektoros READ és WRITE gyorsolvasás/írás eltolását le- 
het beállítani. A gyorsolvasás/írás sebessége már olyan, hogy nem mindegy, hogy a 
következő szektor hol található. Egyetlen szektor átvitelét követően például a status 
byte-ot ki kell értékelni. Ezalatt a lemez továbbforog. Az eltolás értéke azt mondja meg, 
hogy a következő" szektor fizikailag hol is van. Ha az eltolás (interleave) értéke 5, akkor 
a rendszer egymást követő szektorai a következőek: 0,5,10,15,20,4,9,14,19,3,8,13,18,2,7, 
12,17,1. Természetesen ügyelni kell arra, hogy az írás és az olvasás ugyanazon eltolási 
értékkel történjen. 


A parancs segítségével beállítható és lekérdezhető az eltolás értéke. A lekérdezés 
esetén a lemezegység - a gyors protokoll szerint - egyetlen byte-ot küld válaszul: az 
eltolás értékét. 


Bit 

Byte JARO Bra lácsáéá D2s age ő 
0 0 ll 0 1 [0] 1 0 1 
1 o [0 1 1 0 0 0 [0] 
2 w X X 1 (0) (0) N 
3 eltolás 

X - érdektelen 

W - 0-beállítás; 1-lekérdezés 

N - meghajtó (1570/71 esetén —- 0) 

Példák: 

(1) PRINT$15, "UO""CHR$(8):CHR$(1) 


A fenti példa az eltolás értékét 1-re állítja be. Ez azt jelenti, hogy a BURST READ és 
BURST WRITE paranccsal írt szektorok fizikailag egymást követő szektorokba kerülnek. 
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OUERY DISK FORMAT 

A parancs segítségével lekérdezhetjük a lemezegységben levő lemez egy adott 
sávjának formátumát. Ennek a parancsnak a segítségével lehetőség van olyan lemezek 
beliéptetésére is, amelyek legkisebb szektorszáma nem 1. 


A parancs kiadása után a lemezegység belépteti a lemezt, s - gyors adatátviteli 
protokoll segítségével - információt küld a lemezről. 


Az első byte egy statusbyte. Ebből megállapítható, hogy GCR vagy MFM formátumról 
van-e szó. Ha MFM formátumú lemez van a meghajtóban, akkor a lemezegység 5 
további byte-ot küld. Ezek jelentése a következő: 


. byte - szektorok száma (a parancsban megadott sávon) 
byte - logikai sávok száma 

byte - minimális szektorszám 

. byte - maximális szektorszám 

. byte - CP/M eltolás (hardver eltolás az adott sávon) 


aan a 


Bit 

Byte 7 6 5 4 3 2 1 [0] 
[0 [0 1 0 1 0 1 [0] 1 
1 [0 o 1 j ! 0 0 o o 
2 F X xX S 1 o 1 N 
3 sávszám (opcionális) 

Xx - érdektelen 

S - oldal (csak MFM esetén) 

N - meghajtó száma (1570/71 esetén 0) 

F - ha 1, akkor a sávszámnak megfelelő sávon nézi a rendszer az adott információt. 

Példa: 

(1) PRINT 15, "UO";:CHR$(812) 


Az (I) parancs hatására - gyors adatátviteli protokollal - kiolvashatóak a lemezegység- 
ben levő lemez adatai. 


INOUIRE STATUS 


A parancs segítségével lekérdezhetjük/beállíthatjuk a gyors adatátvitelhez tartozó status 
byte-ot. A status byte egyes bitjeinek a jelentése a következő: 


Bit 74 6 5 4 3 2 1 0 


MODE DN méret állapot 
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A 7. bit az MFM formátum jelzője. Ha ez a bit magas, akkor a lemez formátuma MFM, 
ha alacsony (-0) akkor GCR. 


A 6. bit a meghajtó számát jelenti, amire az információ vonatkozik. 1570/71-es 
egységek esetén ez 0. (Kivéve, ha tévedésből az 1-es meghajtóra hivatkoztunk, s ezért 
hibaüzenetet kaptunk.) 


Az 5. és 4. bitek a szektor méretét tartalmazzák az alábbiak szerint: 


00 : 128 byte 
01 : 256 byte 
10 : 512 byte 
11 : 1024 byte 


A 3.-0. bitek a hibaüzenet kódját tartalmazzák. Ezek jelentése GCR és MFM formátumú 
lemezek esetén némileg eltér: 


3210 GCR MFM 

000X " Nincs hiba Nincs hiba 

0010 Szektor nincs Szektor nincs 

0011 Nincs SYNC Nincs AM1 vagy AM2 

0100 Adat blokk nincs sz 

0101 Adat blokk ellenőrző Adat blokk CRC 
összeg hibás összeg hibás 

0110 Formázási hiba Formázási hiba 

0111 Ellenőrzési hiba Ellenőrzési hiba 

1000 Irásvédő rés takarva Irásvédő rés takarva 

1001 Azonosító rész Azonosító rész CRC hiba 
ellenőrző összeg hiba 

1010 Az adat belelóg a - 
követekező blokkba 

1011 ID hiba/lemezcsere Lemezcsere 

1100 zal 7 

1101 bé ki 

1110 Szintaktikus hiba Szintaktikus hiba 

1111 Nem létező meghajtó Nem létező meghajtó 

FASTLOAD 


A parancs segítségével a gyors adatátvitellel tölthetünk be a memóriába egy PRG vagy 
SEOG típusú file-t. 


A parancs kiadása után a file szektorait a lemezegység - megfelelő sorrendben - 


elküldi. Az adatátvitel a gyors adatátviteli protokoll szerint történik, s minden szektort 
egy status byte elküldése előzi meg. 
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Bit 

Byte 7 6 5 4 3 2 1 0 

o o 1 1 o 1 [0 1 

1 0) 0) 1 1 o 0 0) o 

2: P X X 1 1 1 1 1 

37? filenév 
P - nem kötelezően program file (0-csak program file lehet) 
X - érdektelen 
Példa: 
(1) PRINT$15, "UO";CHR$(1284164844-42--1);"ADATOK" 


A parancs hatására a gyors protokoll szerint sorban olvashatjuk az "ADATOK" nevű file 
byte- jait. A file nem kell, hogy PRG típusú legyen. A lemezegység a szektorok első két 
byte-ján talált sáv-szektor információ alapján azonosítja a file blokkjait, s annak 
megfelelően küldi el. 


USER parancsok 
A 1570/71-es lemezegységek további USER utasításokat tartalmaznak, amelyek a GCR 
(szokásos) formátumú lemezek használatát könnyítik. Ezek a következők: 


DOS eltolás beállítása 
Szintaxis: "UO 5 S";CHR$(eltolás) 


A parancs hatására a DOS a file-ok felírásánál az általunk megadott "eltolás" értéket 
használja. 


DOS kísérletek száma 
Szintaxis: "UO 5 R";CHR$(kisérletek) 


A DOS - ha nem tud megnyitni egy file-t, vagy hibát észlel írás/olvasás közben - újra 
kísérletezik. Ezen kísérletek számát állíthatjuk be ezzel a paranccsal. 


ROM ellenőrzése 
Szintaxis: "UOS5T" 


A DOS ellenőrző összeget készít a teljes 32K-s ROM-ról, s ezt összehasonlítja a benne 


tárolt adattal. Ha eltérést talál, a kijelzőn a lámpa 4-et villan. Ha minden rendben van, 
akkor nem történik semmi. 
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Működési mód kiválasztása 
Szintaxis: 
"UO5M1" (1571-es üzemmód) 
"UJO5M0O" (1541-es üzemmód) 


Említettük, hogy a 1570/71-es lemezegységek két üzemmódban tudnak működni. A 
bekapcsoláskor valamelyik üzemmód automatikusan kiválasztódik. Ezen a fenti 
parancsok kiadásával lehet változtatni. 


Oldal kiválasztása 

Szintaxis: 
"UO5HO" (felső oldal) 
"UJOSH1" (alsó oldal) 


A 1571-es lemezegység lehetőséget nyújt arra, hogy a lemezt két egyoldalas lemezként 
használjuk. Ebben az esetben meg kell mondani, hogy melyik oldalát használjuk. 


Tegyük fel, hogy egy egyoldalas lemezünk van. Üres meghajtó mellett adjuk ki az 
"UJOSH1" parancsot, majd tegyük be az egyoldalas lemezt! Ezután a HEADER parancs 
segítségével megformázhatjuk a lemez alsó oldalát, a fenti érintetlen marad! Valójában 
két egyoldalas lemezünk lesz, amelyek közt a fenti parancsok segítségével tudunk 
átkapcsolni. 


Ez főleg olyan kész programok esetén jók, amelyek saját lemezformátumot használnak. 
Ilyenek pl. a FORTH rendszerek. A lemez felső oldalán tárolhatjuk a 
rendszerprogramokat, az alsón az adatokat. A módszerhez terrmészetesen az kell, hogy 
a rendszerből kiadhassunk DOS parancsokat. Ezt azonban a legtöbb rendszer 
megengedi. 
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9.4 A DOS SHELL használata 


A 1570/71-es lemezegységekkel együtt adnak egy DEMO lemezt is, amelyik tartalmazza 
a DOS SHELL nevű programot. A DOS SHELL rezidens bővítése a €C-128-as 
üzemmódnak, s lehetővé teszi a lemezen levő file-ok kezelését. 


A DEMO lemez önindítású lemez, ha tehát a Commodore 128 bekapcsolása előtt 
behelyezzük a már bekapcsolt lemezegység meghajtójába, s csak ezután kapcsoljuk be 
a Commodore 128-at, akkor automatikusan betöltődik és elindul. A DOS SHELL 
inicializálása után automatikusan visszatér a BASIC-be. Ha szükségünk van rá, akkor az 
F1 billentyűt kell megnyomnunk. (A billentyűre eredetileg definiált GRAPHICS már nem 
használható). Ha az F1-et valamiért át kell definiálnunk, akkor a BANK 12: SYS 6656 
parancs kiadásával indíthatjuk el. 


A DOS SHELL az első aktivizálásakor megkérdezi, hogy milyen nyelven szertnénk vele 
kommunikálni. A lehetséges választások: angol, francia, német és olasz. A képernyőn, az 
adott nyelven látszik a kérdés, majd mintegy 6 másodperc múlva újabb nyelven jelenik 
meg. Ha megnyomjuk a CcSzóköz5 billentyűt, akkor a kiírt nyelven fognak a menűk és 
egyéb üzenetek megjelenni. A 6 másodpercet nem kell kivárni, hanem a CXCRSR LES 
billentyű segítségevel áttérhetünk a következő nyelvre. 


A nyelv kiválasztása után a DOS SHELL főmenüje jelenik meg. A kurzor vezérlő 
billentyűk segítségével a megfelelő funkcióra lépünk, s azt a CSzóközz billentyű 
megnyomásával aktivizáljuk. Ha az CF15 billentyűt nyomjuk meg, akkor visszatérünk a 
BASIC-ba. 


DISK/PRINTER SETUP 

(lemezegység/nyomtató beállítása) 

A funkció lehetőséget biztosít a használt lemezegység és nyomtató karakterisztikájának 
a kiválasztásához. A DOS SHELL két - A és B jelű lemezegységet használ. Az egyik a 8- 
as a másik a 8-as vagy 9-es hardver számú egység lehet. Mindkét esetben lehetőség 
van a meghajtó kiválasztására is. Ha az egyik egységet a 9-esnek definiáljuk, akkor a 
DOS SHELL szoftver úton átállítja a hardver számát. 

A kurzor billentyűk segítségével a megváltoztani kívánt paraméterre kell állnunk, majd 
megnyomni az cF75 billentyűt. Erre a paraméter értéke megváltozik. Ha mégsem 
akarjuk megváltoztatni, akkor a CSTOP5 megnyomásával visszaállíthatjuk az eredeti 
értéket. 


Ha az A és B logikai egységek nem ugyanannak a lemezegységnek ugyanazon 
meghajtójára vonatkoznak, akkor a többi funkció esetén a rendszer mindig megkérdezi, 
hogy melyik egységet: az A-t, vagy a B-t használja. A kurzort a használni kívánt egység 
betűjére kell vinni, majd megnyomni az cF75 billentyűt. Ezután a művelet az így 
kiválasztott egységre fog végrehajtódni. 


RUN A PROGRAM 
A funkció lehetővé teszi, hogy a lemezen levő adott programot futtassunk. A funkció 
kiválasztása a RUN cfilenév: BASIC parancs kiadásával ekvivalens. 
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A funkció kiválasztása után a képernyőn a PRG típusú file-ok listája jelenik meg. A 
kurzort a megfelelő file-ra kell pozicionálnunk, majd a  CSzóközsz billentyű 
megnyomásával kiválasztani a file-t. Ha meggondotuk magunkat az CXF55 billentyű 
megnyomásával újra választhatunk. A kiválsztott PRG file az €CF753 0 billentyű 
megnyomása után betöltődik a memóriába és elindul. 


FORMAT A DISK 

A funkció segítségével lemezeket formázhatunk meg. A DOS SHELL egy üres lemezt kér 
a meghajtóba, majd megnézi, nincs-e már megformázva. Ha egy formázott lemezt 
helyeztünk be, akkor kiírja a nevét és azonosítóját, s megkérdezi, hogy tényleg meg 
akarjuk-e formázni. Ha a kurzort a CY5-ra visszük, s megnyomjuk a cCSzóközz 
billentyűt, a formázás megkezdődik. 


Ennek első lépéseként a program kéri a lemez nevét és két karakteres azonosítóját. 
Ezután megformázza a lemezt. 


Ha egy régi lemezt formázunk újra, s nem írjuk be a két karakteres azonosítót, akkor a 
program a régit használja. Ha újonnan megformázott lemezről van szó, akkor 
véletlenszerűen generál egyet. Ha magunk akarjuk megadni, akkor a lemez neve után 
vesszőt kell tennünk, majd beírni a két karaktert. 


CLEANUP A DISK 
A funkció hatására egy VALIDATE parancs hajtódik végre a lemezen. Ha közvetlen írású 
file volt a lemezen, annak tartalma elvész! 


COPY A DISK 
A funkció segítségével egy teljes lemezt másolhatunk le. A másolás lefolyása attól 
függ, hogyan állítottuk be az A és B logikai egység parametereit. 


Ha az A és B logikai egység ugyanarra a fizikai meghajtóra vonatkozik, akkor először 
egy üzenetet kapunk, hogy a memóriában levő program elvész. Ha megnyomjuk az 
cxF55 vagy CSTOP5 billentyűket, akkor a másolás félbeszakad, s a programunk nem 
törlődik. Ha folytatni akarjuk a másolást, nyomjuk meg a CSzóköz5 billentyűt. Ezután a 
rendszer felváltva kéri az eredeti (original) és az új (copy) lemezeket a meghajtóba. A 
megfelelő behelyezése után a CSzóköz5 billentyűt kell megnyomni. 


Ha másolás közben a CSTOP5 billentyűt megnyomjuk a másolás félbeszakad s a 
program visszatér a főmenühöz. 


Abban az esetben, ha az A és B fizikailag különböző meghajtók a program megkérdezi, 
hogy melyikről akarunk másolni, majd felkéri az eredeti és a másolat lemezt. Mindegyik 
behelyezése után a cCSzóközs billentyűt kell megnyomni. A másolás közben a 
programunk megmarad. 


COPY FILES 

A funkció segítségével megadott file-okat másolhatunk egyik lemezről a másikra. A 
másolandó file-ok kiválasztása a kurzor névre történő pozicionálásával és a cSzóközs 
billentyű megnyomásával végezhető el. A kiválasztott filenév törölhető, ha ráállunk és 
megnyomjuk az cFS55 billentyűt. A másolás folyamata bármikor megszakítható a 
SLSTOP5 billentyű megnyomásával. Ha valamennyi mésolandó file-t kiválasztottuk, 
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akkor a másolás az CF75 billentyű megnyomásával megkezdhető. A biztonság kedvéért 
a program még visszakérdez, hogy rendben van-e a lista. Ha nyugtázó választ adunk, 
akkor megkezdődik a másolás, ha nem, akkor folytathatjuk a file-ok kiválasztását. 


A másolás végrehajtásának módja megint attól függ, hogy az A és B lemezek ugyanazt 
a fizikai meghajtót jelentik-e vagy sem. Ha igen, akkor figyelmeztető üzenetet kapunk, 
hogy a memóriában levő progam elvész. Ezt a CSzóköz: billentyű megnyomásával 
nyugtázhatjuk, vagy az CF55 megnyomásával megállíthajuk a másolás folyamatát. A 
program felváltva kéri a meghajtóba az eredeti (original) és a másolat (copy) lemezt. A 
másolat első bekérése után megnézi, hogy meg van-e formázva. Ha nincs, akkor 
megformázza. Ha már formázott lemezt használunk, akkor kiirja a lemez nevét, s 
megkérdezi, hogy nem akarjuk-e megformázni. A CY5 (igen) vagy CN: kiválasztása 
után a cCSZóközz billentyű megnyomására kezdődik a másolás. Ha a formázást 
választottuk, akkor megformázza a lemezt. Ha nem, akkor a meglevő file-okhoz írja 
hozzá az átmásolt file-okat. 


Ha az A és B lemezek különböző meghajtóra vonatkoznak, akkor a program nem vész 
el. A rendszer az egyik, illetve a másik meghajtóba felkéri az eredeti és a masolat 
lemezt, majd hasonlóan az előző esethez, ellenőrzi, hogy a másolat lemezt 
megformáztuk-e már. Ha igen, akkor megkerdezi, hogy újra formázza-e. Ezután a 
másolás végrehajtódik. 


DELETE FILES 

A funkció segítségével a lemez katalógusából kiválasztott file-okat törölhetjük. A 
kiválasztás úgy történik, hogy a kurzort a törölni kívánt file-ra pozicionáljuk, majd 
megnyomjuk a cSzóközz billentyűt. Hasonlóan vonhatjuk vissza a kiválasztást, csak 
akkor az CcF55 billentyűt kell megnyomnunk. A kiválasztás befejezése után az CF75 
megnyomásával kezdhetjük el a törlést. A program visszakérdez, hogy rendben van-e a 
lista. Az CcY5 (igen) vagy CN: (nem) betűre állunk, s megnyomjuk a szóköz billentyűt. 
Ha nemmel válaszolunk, akkor folytathatjuk a törlendő file-ok kiválasztását, ha igennel, 
a törlésük megtörténik. 


RESTORE FILES 

A funkció segítségével törölt file-okat állíthatunk vissza. Ezek kiválasztása hasonlóan 
történik, mint az előző funkcióban. A visszakérdezés után a program megkisérli a file- 
okat visszaállítani. Ha ez nem sikerül, akkor hibaüzenetet kapunk, feltüntetve annak a 
file-nak a nevet, amelyet nem sikerült visszaállítani. 


RENAME FILES 
A funkció segítségével file-okat nevezhetünk át. A listában a kurzort az átnevezni kívánt 
file-ra állítjuk, s megnyomjuk a CSzóköz5 billentyűt. Ezekután lehetőségünk van az új 
név megadására. Ha olyan nevet adunk meg, ami már létezik, akkor hibaüzenetet 
kapunk. Ha mégsem akarunk új file nevet megadni, akkor az cF55 billentyűt kell 
megnyomnunk. 


A szükséges változtatások elvegzése után nyomjuk meg az CF75 billentyűt. A rendszer 
visszakérdez, hogy rendben vannak-e a változtatások. Ha az GCY5-ra állunk és 
megnyomjuk a CSzóköz5 billentyűt, akkor a program az általunk végzett átnevezéseket 
visszaírja a lemezre. 
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REORDER DIRECTORY 

A funkció lehetőséget biztosít a katalógus átrendezésére, azaz, arra, hogy a filenevek és 
a hozzájuk tartozó egyéb bejegyzesek más sorrendben legyenek a katalógusban, mint 
jelenleg. 


Az átrendezést a képernyőn megjelenő listán kell először elvégezni. A kurzort arra a 
filenévre visszük, amelynek a helyét meg akarjuk változtani, majd megnyomjuk a 
ScSzóköz5 billentyűt. Ezután az új helyére visszük és újból megnyomjuk a CSzóközz 
billentyűt. Ha minden file-t a helyére raktunk, akkor megnyomjuk az CF75 billentyűt. 


A rendszer visszakérdez, hogy rendben van-e az átrendezés. Ha igennel válaszolunk, 
akkor az új katalógust visszírja a lemezre, ha nemmel, akkor tovább folytathatjuk a 
rendezést. 


9.5 Példák 

Ebben a részben két BASIC programot mutatunk be, amelyek ugyanazt a gépi kódú 
programot használják. A rutin a gyors adatátvitelt valósítja meg egy 1570/71-es 
lemezegység és a Commodore 128 között. Az MMU chip használata miatt - sajnos - a 


rutin C-64-es üzemmódban nem használható. 


A gépi kódú rész két rutinból áll: a $0C0O3 alatti az író, a $0C00 alatti az olvasó rutin. 
Meghívásuk előtt az alábbi memóriarészekbe a megfelelő értékeket be kell írnunk: 


$0C0O6 - szektorméret 1 - 256 byte 


2 - 512 byte 
4 - 1024 byte 
Olvasás 
$0C09 - a 4. bit  "magas(1) z a lemez hátoldala 


a lemez felső oldala 


alacsony(0) 
$0OCOA - olvasandó sáv száma 


$0COB - olvasandó szektor száma 

$0COC - az olvasni kívánt szektorok száma 

$0OCOD - következő sáv 

Írás 

$0C10 - a 4. bit  magas(1) z a lemez hátoldala 
alacsony(0) - a lemez felső oldala 

$0C11 - írandó sáv száma 

$0C12 - írandó szektor száma 

$0C13 - az írni kívánt szektorok száma 


A gépi kódú program a $0400 címtől terjedő memórirészt használja puffernek, ide ír, s 
innen olvas. Ez jól nyomonkövethetővé teszi az írás-olvasás folyamatát. Normál 
használat esetén a puffert természetesen máshol kell kijelölni. 


Az első BASIC program normál GCR formátumú lemez 0. sávjának egymást követő 
három szektorába ír 256-256 byte-ot, a byte-ok értéket 0-tól 255-ig változtatva. Az 
adatok visszaolvasása akármelyik billentyű megnyomásával elkezdődik. Vízuálisan is 
ellenőrizhető, hogy ugyanazokat az adatokat olvastuk vissza. 
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A BASIC program a gépi kódú programot DATA sorokban tartalmazza. Az 1040-1070 
sorok a rutint a helyére töltik. Ha rosszul gépeltük a DATA sorokat, a 1110. sorban 
hibaüzenetet kapunk. Ezután az 1150-1190 sorok feltöltik a puffert. 


Az előbbiek FAST üzemmódban történnek. (Ha 80 oszlopos képernyőt használunk, akkor 
a FAST és SLOW utasításokat hagyjuk ki!) Az 1230-1250 sorok beléptetik a lemezt a 
rendszerbe. Az 1270-ik sor kiírja a három szektort a lemez első sávjára. (A példához 
megformázott, de másra nem használt lemezt használjunk, mert különben a lemezen 
levő file-ok megsérülhetnek.) 


Az 1290-ik sor visszaolvassa a kiírt szektorokat. 


1000 fast 

1010 : 

1020 bank 15: c-dec(70c00"): read a 
1030 : 

1040 do until a-—1 

1050 s-sta 

1060 poke c,a: c-ct1: read a 

1070 loop 

1080 : 

1090 if sCc551811 then begin 

1100 slow: scnelr 

1110 print "hibas adat a data sorokban!" 
1120 end 

1130 bend 

1140 : 

1150 fori-Oto 2 

1160 : for j-O to 255 


1170: : poke dec(70400")4256"itj,j 
1180: next j 

1190 next i 

1200 : 

1210 slow 

1220 : 


1230 open 15.8,15 

1240 print$ 15, "uO";chr$(4) 

1250 close15 

1260 : 

1270 sys dec("0c03"): getkey a$ 

1280 print" CCLR5 €21"CRSR-LE5"; 
1290 sys dec(70c00") 

1300 : 

1310 data 76,21,12,76,189,12,1,85 

1320 data 48,0,1,1,3,2.85,48 

1330 data 2,1,1,3,.2,169,0,133 

1340 data 251,169,4,133,252,169,15,162 
1350 data 8,160,15,.32,186,255,169,0 
1360 data 32,189,.255,32,192,255,169,0 
1370 data 133,250,173,28,10,41,191,141 
1380 data 28,10,162,15,.32,201,255,162 
1390 data 0,160,7,189,7,12,32,210 

1400 data 255,232,136,208,246,32,204,255 
1410 data 44,28,10,80,96,120,44,13 
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1420 data 220,174,12,12,173,0,221,73 
1430 data 16,141,0,221,169,8,44,13 

1440 data 220,240,251,173,0,221,73,16 
1450 data 141,0,221,173,12,220,133,250 
1460 data 41,15,201,2,176,55,160,0 

1470 data 173,6,12,133,254,169,8,44 
1480 data 13,220,240,251,173,0,221,73 
1490 data 16,141,0,221,173,12.220,145 
1500 data 251,200,208,233,198,254,240,5 
1510 data 230,252,76,133,12,202,240,5 
1520 data 230,252,76,100,12,88,24,169 
1530 data 15.32,195,.255,96,88,56,169 
1540 data 15.32,195,.255,96,169,0,133 
1550 data 251,169,4,133,252,169,15,162 
1560 data 8,160,15,32,186,255,169.0 
1570 data 32,189,255,32,192,.255,169,0 
1580 data 133,250,173,28,10,41,191,141 
1590 data 28,10,162,15,32,201,255,162 
1600 data 0,160,7,189,14,12,32,210 

1610 data 255,232,136,208,246,32,204,255 
1620 data 44,28,10,80,110,120,169,64 
1630 data 133,253,160,0,174,19,12,32 
1640 data 115,13,173,6,12,133,254,173 
1650 data 0,221,205,0,221,208,248,69 
1660 data 253,41,64,240,242,165,253,73 
1670 data 64,133,253,177,251,141,12,220 
1680 data 169,8,.44,13,220,240,251,200 
1690 data 208,221,198,254,240,5,230,252 
1700 data 76,15,13,32,152,13,44,13 

1710 data 220,32,171,13,169,8,44,13 
1720 data 220,240,251,173,12,220,133,250 
1730 data 32,180,13,165,250,41,15,201 
1740 data 2,176,16,202,240,5,230,252 
1750 data 76,7,13,88,24,169,15.32 

1760 data 195,255.96.88,169,15,32,195 
1770 data 255,56.96,173,5,.213,9,8 

1780 data 141,5,213,169,127,141,13,220 
1790 data 169,0,141,5,220,169,4,141 
1800 data 4,220,173,14,220,41,128,9 
1810 data 85,141,14,220,44,13,220,96 
1820 data 173,14,220,41,128.9,8,141 
1830 data 14,220,173,5,.213,41,247,141 
1840 data 5,213,96,173,0,221,9,16 

1850 data 141,0,221,96,173,0,221,41 
1860 data 239,141,0,221,96,-1 


A második program lehetővé teszi egy tetszőleges MFM formátumú lemez felső oldalán 
levő szektorainak vizsgálatát. A program először megkérdezi, hogy hányszor 256 byte- 
ból áll a lemez egy szektora, majd folyamatosan kéri a sáv és a szektor számát. A 
szek-ror beolvasás után a képernyőmemóriába kerül. Ezzel a rutinnal MFM formátumú 
lemezeket is olvashatunk. Ha pl. van egy IBM PC-n használt lemezünk, annak szektorait 
ezzel a programmal le tudjuk olvasni, s erre építve készíthetünk egy GCR - MFM 
másolóprogramot is. Sok szerencsét hozzá! 
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1000 fast 

1010 : 

1020 c-dec("0c00"): read a: bank 15 
1030 : 

1040 do until a-—-1 

1050 s-sta 

1060 poke c,a: c-cr1: read a 

1070 loop 

1080 : 

1090 slow 

1100 if sC551811 then begin 

1110 scnelr 

1120 print "hibas adat a data sorokban!" 
1130 end j 

1140 bend 

1150 : 

1160 input "sector/256";s 

1170 poke dec(70c06") s 

1180 poke dec("0c0OCc"),1 

1190 : 

1200 input "track sector-"xy 

1210 if xs--1 then end 

1220 poke dec("0c0a"),x 

1230 poke dec("OcOb"),y 

1240 : 

1250 open 15.8,15 

1260 print 15, "uO";chr$(4) 

1270 close15 

1280 : 

1290 print" CCLR5 €21"CRSR-LE5S"; 
1300 sys dec("0c00") 

1310 print ds$ 

1320 goto 1200 

1330 : 

1340 data 76,21,12,76,189,12,1,85 

1350 data 48,0,1,1,3,2,85,48 

1360 data 2,1,1,3,2,169,0,133 

1370 data 251,169,4,133,252,169,15,162 
1380 data 8,160,15,32,186,255,169,0 
1390 data 32,189,255,32,192,255,169,0 
1400 data 133,250,173,28,10,41,191,141 
1410 data 28,10,162,15,32,201,255,162 
1420 data 0,160,7,189,7,12,32,210 

1430 data 255 ,232,136,208,246,32,204,255 
1440 data 44,28,10,80,96,120,44,13 
1450 data 220,174,12,12,173,0,221,73 
1460 data 16,141,0,221,169,8,44,13 
1470 data 220,240,251,173,0,221,73,16 
1480 data 141,0,221,173,12,220,133,250 
1490 data 41,15,201,2,176,55,160,0 
1500 data 173,6,12,133,254,169,8.44 
1510 data 13,220,240,251,173,0,221,73 
1520 data 16,141,0,221,173,12,220,145 
1530 data 251,200,208,233,198,254,240,5 
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1540 data 230,252,76,133,12,202,240,5 
1550 data 230,252,76,100,12,88,24,169 
1560 data 15.32,195,255,96,88,56,169 
1570 data 15,32,195,255,96,169,0,133 
1580 data 251,169,4,133,252,169,15,162 
1590 data 8,160,15,32,186,255,169,0 
1600 data 32,189,255,32,192,255,169,0 
1610 data 133,250,173,28,10,41,191,141 
1620 data 28,10,162,15,32,201,255,162 
1630 data 0,160,7,189,14,12,32,210 

1640 data 255,232,136,208,246,32,204,255 
1650 data 44,28,10,80,110,120,169,64 
1660 data 133,253,160,0,174,19,12.32 
1670 data 115,13,173,6,12,133,254,173 
1680 data 0,221,205,0,221,208,248,69 
1690 data 253,41,64,240,242,165,253,73 
1700 data 64,133,253,177,251,141,12,220 
1710 data 169.8,44,13,220,240,251,200 
1720 data 208,221,198,254,240,5,230,252 
1730 data 76,15,13,32,152,13.44,13 

1740 data 220,32,171,13.169,8,44,13 
1750 data 220,240,251,173,12,220,133,250 
1760 data 32,180,13,165,250,41,15,201 
1770 data 2,176,16,202,240,5,230,252 
1780 data 76,7,13,.88,24,169,15,32 

1790 data 195.255.96,88,169,15,32,195 
1800 data 255,56,96,173,5,.213.9,8 

1810 data 141,5,.213,169,127,141,13,220 
1820 data 169,0,141,5,220,169,4,141 
1830 data 4,220,173,14,220,41,128,9 
1840 data 85,141,14,220,44,13,220,96 
1850 data 173,14,220,41,128.9,8,141 
1860 data 14,220,173,5,213.41,247,141 
1870 data 5,213,96,173,0,221,9,16 

1880 data 141,0,221,96,173,0,221,41 
1890 data 239,141,0,221,96,-1 


A gépi kódú rész listája az alábbi: 


setlfs z $ffba 
setnam - $ffbd 
open z $ffc0 
close z $ffc3 
chkout z $ffc9 
elrehn z $ffcc 
bsout z $ffd2 
mmureg  - $d505 
ditiml - $dc04 
diítimh z $dc05 
dlcra z $dc0e 
disdr z $dc0c 
dlicr z $dc0d 
d2pra - $dd00 
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$0a1c 


serial 


oldeilk z $fd 

stat $fa 

buffad $0400 
buffer $fb 

sector $fe 

elkin 9501000000 
ckini O1O111111 
clkout 97500010000 


MI 


, 


we 


[ 


$0C0OO ; a program az RS232-es pufferekben van 
beolvasó rutin többi része 
kiíró rutin többi része 


jmp readsp 
jmp writsp 


scsize .byte 1 

cmobuf .byte "u0"$00,1,1,n,2 
cmibuf .byte "u0"$02,1,1,n,2 
cmdig 7 


szektorméret (alanértelmezés - 256) 


a parancs hossza 


readsp Ida $ Cbuffad 
sta buffer 
Ida $5buffad 
sta buffert1 


puffer kezdőcímének beállítása 


Ida 415 
ldx 48 

ldy 415 
jsr setlfs ; a csatorna kijelőlése 


OPEN. 15.815 


Ida 40 


jsr setnam nincs filenév 


a 


jsr open 


a csatorna megnyitása 


read Ida $£0 
sta stat 
Ida serial ; a FAST bit (gyors egység) törlése 
and f/10111111 
sta serial 


a hibaüzenet törlése 


lIdx 415 ; 15-ös csatorna 
jsr chkout 


ldx 0 

Idy $cmdlg 
sendit Ida cmobuf.x 

jsr bsout 

inx 

dey 

bne sendit 


az olvasási parancs elküldése 
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readit 
wait1 


toprd 
wait2 


donsec 


donerd 
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isr elrehn 

bit serial 

bvce error 

sei 

bit dlicr 

Idx cmobuft5 
Ida d2pra 

eor $9700010000 
sta d2pra 


Ida 48 
bit dlicr 
beg wait! 


Ida d2pra 
eor 4900010000 
sta d2pra 


Ida disdr 

sta stat 

and fH/O00001111 
cmp $2 

becs error 


Idy 0 
Ida scsize 
sta sector 
Ida 48 
bit dlicr 
beg wait2 


da d2pra 
eor 49" 00010000 
sta d2pra 


Ida disdr 
sta (buffer)y 
iny 

bne toprd 
dec sector 
beg donsec 
inc buffertr1 
imp toprd 
dex 

beg donerd 


inc buffert1 
imp readit 


eli 
ele 
Ida $15 
jsr close 


csatorna lezárása 
ha nem gyors egység (pl. 1541) 
ugrás az "error" rutinra 


megszakítások letiltása 
X - olvasandó szektorok száma 


megszakító regiszter alapállapotba 
állítása 


várakozás a soros kapu 
által okozott megszakításra 


CLK invertálása 


az egység által küldött statusz 
byte tárolása 
s annak ellenőrzése, nem történt-e hiba 


ha stat52, akkor ugrás "error" -ra 


byte-mutató 
lapmutató beállítása 


várakozás a soros kapu által 
okozott megszakításra 


; CLK invertálása 


; a soros kapuban levő adatbyte tárolása 


; bytemutató csökkentése 
; van még byte --5 következő adatbyte olvasása 
:" lapmutató csökkntése 


nincs több -—-5 donsec 

van még --5 lapmutató növelése 
következő adatbyte olvasása 

a szektorok számának csökkentése 
ha nincs --5 vége 


lapmutató növelése 
következő szektor olvasása 


megszakítások engedélyezése 


; nem történt hiba 


parancs csatorna lezárása 
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rts ; vissza a hívó programhoz 
error eli ; megszakítások törlése 
sec ; C magas - hiba történt 
lda 15 
jsr close ; parancs csatorna lezárása 
rts ; vissza a hívóhoz 
; write 
writsp Ida $ cbuffad ; puffer kezdőcímének beállítása 
sta buffer 
Ida $ 5 buffad 
sta buffert1 
Ida $15 ; OPEN 15.8,15 
ldx 48 
Idy 415 
jsr setlfs ; beállítása 
Ida 0 
jsr setnam ; nincs név 
jsr open ; megnyitás 
write Ida 40 ; hibajelző törlése 
sta stat 
Ida serial ; a gyors adatátvitelt jelző bit törlése 
and $/10111111 
sta serial 
ldx 415 
jsr chkout ; parancs csatorna kijelölése 
ldx 0 ; olvasási parancs elküldése 
Idy ecmdlg 
send Ida cmibuf,x 
jisr bsout 
inx 
dey 
bne send 
jsr clrehn ; eredeti csatornák visszaállítása 
bit serial ; ha nem gyors -——5 ferrorV 
bvc error1 
sei ; megszakítások letiltása 
Ida $clkin 
sta oldcik ; órajel beállítása 
Idy 40 ; byte mutató beállítása 
ldx cmibuft5 ; szektorszám beállítása 
writit jsr spout ; írás előkészítése 
Ida scsize 
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topwr 


optw 
wait3 


donsic 


wait4 


donewr 
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sta sector 
Ida d2pra 


cmp d2pra 
bne topwr 


eor oldcik 
and felkin 
beg topwr 


Ida oldcik 
eor $elkin 
sta oldcik 


Ida (buffer),y 
sta disdr 


Ida 8 
bit dlicr 
beg wait3 


iny 
bne topwr 
dec sector 


beg donsic 
inc buffert1 
jmp topwr 
isr spinp 
bit dlicr 

jsr clklo 


Ida 8 
bit dlicr 
beg wait4 


Ida disdr 
sta stat 
jsr clkhi 


Ida stat 

and 4$0f 
cmp $02 
becs error1 


dex 
beg donewr 


inc buffert1 
imp writit 


eli 


lapmutató beállítása 
az A regiszter stabil értékének 


a megvárása 


; a vonal invertálása 


az adatbyte beírása a soros kapuba 


várakozás a soros kapú által 
okozott megszakításra 


byte-mutató csökkentése 
van még byte ——5 kiírjuk 
lapmutató csökkentése 


kész --5 donsic 
puffer mutató növelése 
következő byte kiírása 


olvasás előkészítése 
megszakítások inicializálása 


; CLK alacsonyra állítása 


; várakozás a statusz byte-ra 


statusz byte tárolása 


; hiba ellenőrzése 


; stat22 --5 ferrorV 


szektorszám csökkentése 
nincs több szektor --5 donewr 


puffermutató növelése 


; következő szektor kiírása 


megszakítások engedélyezése 
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cle 
Ida 15 
jsr close 
rts 


hiba nem történt jelzése 


hibacsatorna lezárása 
vissza a hívóhoz 


error1 eli 
Ida $§15 
jsr close 
sec 
rts 


megszakítások engedélyezése 


hibacsatorna lezárása 
hiba történt jelzése 
vissza a hívóhoz 


spout Ida mmureg MMU-ban az írás beállítása 
ora 4$08 
sta mmureg 
Ida 4$7f 
sta dlicr 

Ida $O 

sta dltiíimh 
Ida 4$04 
sta ditiml 
Ida dlcra 
and $$80 
ora 1$55 
sta dlcra 
bit diicr ; a megszakítások törlése 
rts 


soros kapu szerinti megszakítás 
engedélyezése 


a kisiftelés idejének beállítása 


az A óraregiszter üzemmódjának beállítása 


spinp Ida dlcra 
and $80 
ora 4$08 
sta dilcra 
Ida mmureg 
and $$f7 
sta mmureg 
rts 


az A óraregiszter üzemmódjának 
visszaállítása 


az MMU-ban az olvasás jelzése 


clklo Ida d2pra 
ora fcelkout 
sta d2pra 
rts 


CLK alacsonyra állítása 


clkhi Ida d2pra ; CLK magasra állítása 
and $$ff-cilkout 
sta d2pra 
rts 


.end 
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10. fejezet 


A 80 oszlopos (VDC 8563) video chip programozása 


10.1 Bevezetés 


Commodore 128 


A 80 oszlopos video chipről - ha röviden is - szóltunk a 6. fejezetben a 218-223 
oldalakon. Ebben a fejezetben részletesen ismertetjük használatát. 


A 80 oszlopos video chipnek mindössze két regisztere található a memóriában - ezek a 


kommunikációs regiszterek. A két regiszter tartalma a következő: 


Feet] leírás pó az egyes bitek jelentése I 
Z 6 5 4 3 2 1 o 
$D600 Ír regiszterszám írás -- -- R5 R4 R3 R2 R1 RO 


állapot olvasás . ISTATUS LP VBLANK -- 
$D601 adat iras/olvasas D7 D6 D5 D4 


D3 


VERO VERI VER2 
D2 D1 DO 


A VDC 8563 chip regiszterei és a video memória ezeken a kommunikációs regisztereken 
keresztül érhetők el, ahogy azt a 228. oldalon már leírtuk. A VEROVER1,VER2 bitek a 
video chip verziószámát adják. Mint majd látjuk, bizonyos esetekben erre tekintettel kell 


lenni. 


A VDC 8563-t elsősorban karakteres megjelenítésre tervezték. Két, egyenként 256 
elemű karakterkészletet képes kezelni. Szemben azonban a VIC-vel ezeket egyszerre 
jeleníti meg. Rendelkezik grafikus lehetőségekkel is, ezeket azonban nem lehet a VIC 
fejlett grafikus lehetőségeivel összehasonlítani. Elég, ha csak a sprite-okra gondolunk! 
Éppen az önálló videó memória miatt a chip 2MHz-es órajellel is képes üzemelni. 


10.2 A 8563 chip regiszterei 


A Commodore információs kártya 36. oldala tartalmaz egy áttekintő táblázatot a chip 
regisztereiről, az alábbiakban részletesen felsoroljuk valamennyit. Először a regiszter 
elnevezését, majd az egyes bitek jelölését adjuk meg. Ezt követi a bitek használatának 
részletes leírása. A megadott alapértelmezést a Commodore 128-as gép C128-as 
módjában használja a rendszer, a CP/M mód ettől eltérő értékeket használ. 


0. regiszter (vizszintes totál): HT7 HT6 HT5 HT4 HT3 HT2 HT1 HTO 
A 8 bites érték két vizszintes szinkronizációs jel közti távolság - 1, karakterekben 
mérve. Ez magában foglalja a kijelzett karaktereket, a keret méretét és a két jelzés közti 


"üresjáratot is. A C-128 BASIC ezt 126-ra állítja be. 


1. regiszter (karakter/sor): HD7 HD6 HD5 HD4 HD3 HD2 HD1 HDO 


A 8 bites érték a kijelzett karakterek számát adja meg. Kezdőértéke 80. 


2. regiszter (szinkron pozició): HS7 HS6 HS5 HS4 HS3 HS2 HS1 HSO 

A rngiszter a vízszintes szinkronizáció helyét adja meg karakterekben. Az érték az első 
kijelzett karaktertől mérendő, így az értéknek az R1 regiszterben levőnél nagyobbnak 
kell lennie. Ez az érték határozza meg, hogy az RGBI monitoron hol jelenjen meg a kép. 


Kezdőértéke: 102. 
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3. regiszter (szinkron szélesség): SW7 SW6 SW5 SW4 SWw3 SW2 SW1 SWO 

Az SW3-SWO bitek a vízszintes, az SW7-SW4 bitek a függőleges szinkron nagyságát 
adják meg. A vízszintes szinkron karakterben, a függőleges raszter sorban értendő. 
Kezdőérték: 73 (-4"16-9). Ez 9 karakternek és 4 rasztersornak felel meg. 


4. regiszter (függőleges totál): VT7 VT6 VT5 VT4 VT3 VT2 VT1 VTO 

Hasonlóan a 0. regiszterhez a 8 bites szám két függőleges szinkronjel közti távolság - 
1, karakterekben mérve. Ez az érték magában foglalja a kijelzett sorokat, a keretet és a 
két jel közti üresjáratot. A C128 ezt az értéket 39-re állítja be. 


5. regiszter (függőleges eltolás): —-—- -- -- VA4 VA3 VA2Z VAI VAO 

Az 5 bites szám a függőleges szinkron jelét növeli meg rasztersorban mérve. A 
függőleges szinkron finom hangolására való. Ha interlace módban dolgozunk, akkor az 
értékét a kívánt kétszeresére kell beállítani. Ezért 5 bites a regiszter. Kezdeti értéke 0. 
Ha a regisztert olvassuk, a felső bitek mindig 1-et adnak, s ezért a 0 kezdeti érték 224- 
nek látszik. 


6. regiszter (sorszám/képernyő): VD7 VD6 VD5 VD4 VD3 VD2 VD1 VDO 
A kijelzett sorok száma. A C-128 ezt 25-re állítja be. Ennek az értéknek kisebbnek kell 
lennie a 4. regiszter értékénél. 


7. regiszter (függőleges szinkron): VS7 VS6 VS5 VS4 VS3 VS2 VS1 VSO 

A függőleges szinkron kezdete - 1, karakterekben mérve. Az érték az első kijelzett 
karaktersortól számít, így nagyobbnak kell lennie, mint a 6. regiszterben levő érték. 
Kezdőértéke 32. 


8. regiszter (interlace mód): -—— —-— —— —— —— -- IL1 ILO 

A regiszter az ún. interlace módot állítja be. A chip összesen 3 féle raszter 
megjelenítési módot ismer. Ezek a következők: nincs interlace, van interlace és van 
interlace és video szinkronizálás is. 


Ha nincs interlace szinkronizálás, akkor minden egyes raszter sor a függőleges szinkron 
ütemében kerül frissítésre. Ez a 00 és 10 bitkombinációknak felel meg. 


Ha csak interlace szinkronizálást engedünk meg, akkor a páros és páratlan raszter sorok 
felváltva lesznek frissítve. Mind a függőleges, mind a vízszintes raszter sorokban 
ugyanaz jelenik meg, de ezek egymáshoz képest fél raszter sorral eltolva jelennek meg. 
Ennek következtében a karakter sokkal tömörebb lesz függőleges irányban. A hatás 
elsősorban kimondottan az erre tervezett monitorokon érzékelhető. Ennek a módnak a 
01 bitkombináció felel meg. 


Az interlace és video szinkronizálás esetén a páros és páratlan raszter sorok nem 
ugyanazt az információt generálják, s ennek következtében a függőleges felbontás 
duplájára nő. Ehhez a 8563 további regisztereit is át kell programozni. Egyes értékek 
(függőleges eltolás, függőleges szinkron stb.) csak párosak lehetnek. 


A C-128 nem használ interlace szinkronizálást, ezért IL1 és ILO értéke 0. Ha a regisztert 
kiolvassuk, akkor 252-t kapunk, mert a nem használt bitek 1-et adnak. 

9. regiszter (karakterméret): —— -—— -- CV4 CV3 CV2 CVI CVO 

A karaktert alkotó rasztersorok száma - 1. A méretbe a karaktersorok közti rés 
nagyságát is be kell számítani. Kezdeti értékét a rendszer 7-nek állítja be, ez 8 
rasztersornak felel meg. Ez kiolvasáskor 231-et ad. 
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10. regiszter (kurzor mód): -—— CM1 CMO CS4 CS3 CS2 CS1 CSO 
A CM1 és CMO bitek a kurzor megjelenésének módját határozzák meg. Az egyes 
értékek jelentése a következő: 


CM1 CMO kurzor tipusa 
0 


alló kurzor 
1 ] — nincs kurzor I 
0 ] lassú villogás I 
1 


gyorsabb villogás 


A CS4-CSO bitek a kurzor első sorát adják meg. Ettől a rasztersortól kezdve villog a 
kurzor karaktere. 


11. regiszter (kurzor típusa): -—— -- -- CT4 CT3 CT2 CT1I CTO 

A regiszter az utolsó rasztersort adja meg a karakteren belül, ahol a kurzor még villog. 
A CS és CT bitek együtt határozzák meg, hogy a kurzor helyén álló karakter mekkora 
darabja villog. 


12. regiszter (képernyő memória Hi): VM15 VM14 VM13 VM12 VM11 VM10 VM9 VM8 

13. regiszter (képernyő memória LO): VM7 VM6 VM5 VM4 VM3 VM2 VM1 VMO 

A két regiszter együttesen meghatározza, hogy a video memóriában hol kezdődik az a 
rész, ami alapján a rendszer a képernyőn levő információt generálja. A képernyő kódok 
sorfolytonosan helyezkednek el, úgy mint a VICII chip esetében. Eltérően a processzor 
címektől, először a 16 bites cím felső, azután az alsó byte-ját tárolja a chip. A C-128 a 
képernyő memóriát a $0000 címre helyezi (a képernyő memóriában). 


Grafikus üzemmódban ez a cím a bit térkép elejére mutat és az első nyolc képpont 
adatait tartalmazza. (Magas bit- bekapcsolt pont) Eltérően a VICII-től ebben az esetben 
is sorfolytonos a tárolás: az egyes képpontokat rasztersoronként kell elhelyezni! 


A 80"25-ös karakteres képernyőhöz 80"25-2000 byte-ra, míg a 640"200 képpontból álló 
grafika megjelenítéséhez 6407200/8-16000 byte-ra van szükség. 


14. regiszter (kurzor helye HI): CP15 CP14 CP13 CP12 CP11 CP10 CP9 CP8B 

15. regiszter (kurzor helye LO): CP7 CP6 CP5 CP4 CP3 CP2 CP1 CPO 

A két regiszter együtt a video memória címét határozza meg. Ha ennek a címnek a 
képernyőn egy látható karakter felel meg, akkor a 10-11. regiszterek tartalmának 
megfelelő módon ezen a helyen a kurzor villogni fog. Ha a kurzor módját "nincs 
kurzor"-nak választottuk, akkor a kurzor termeszetesen nem villog. 


16. regiszter (fényceruza vízszintes): LH7 LH6 LH5 LH4 LH3 LH2 LHI LHO 

17. regiszter (fényceruza függőleges): LV7 LV6 LV5 LV4 LV3 LV2 LVI LVO 

A két regiszter együtt a fényceruza pozícióját adja. Azt, hogy ez valódi érték-e, a 
kommunikációs regiszter 6., LP bitje mondja meg. Ha a bit alacsony(0), akkor a 
regiszterek nem tartalmaznak értékes adatot. Ha igen, akkor a regiszterekbe a 
fényceruza valódi adatai íródtak be. A 16. vagy 17. regiszter kiolvasása az LP bitet törli. 
A függőleges érték 1-től, míg a vízszintes érték 8-tól kezdődik. 
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18. regiszter (aktuális byte HI): UA15 UA14 UA13 UA12 UA11 UA10 UA9 UA8B 

19. regiszter (aktuális byte LO): UA7 UA6 UA5 UA4 UA3 UA2 UA1 UAO 

A két regiszter együtt egy 16 bites címet határoz meg a chip saját video memóriájában. 
A 18. és 19. regiszterek bármelyikébe való írás esetén a 8563-as video chip 
automatikusan beolvassa a megcímzett byte-ot a video memóriából a 31. regiszterbe. 
Az olvasás sikeres befejezését a kommunikációs regiszter STATUS bitje jelzi: magas(1) 
lesz. Ekkor lesz a 31. regiszterben értékes adat. Ezzel egyidőben a VDC 8563 eggyel 
megnöveli a 18-19. regiszterekben levő címet. Az adatok folyamatos olvasásához tehát 
nem kell a címet programból növelni. 


Az írás hasonlóan történik. Ha a 31. regiszterbe írunk egy adatot, akkor a 18-19. 
regiszterek által meghatározott címre másolja a byte-ot a chip, majd megnöveli a címet 
és az annak megfelelő adatot beolvassa a 31. regiszterbe. A művelet befejezésekor a 
STATUS bit magas(1) lesz. 


20. regiszter (szín memória H!): VC15 VC14 VC13 VC12 VC11 VC10 VC9 VCB 

21. regiszter (szín memória LO): VC7 VC6 VC5 VC4 VC3 VC2 VC1 VCO 

A két regiszter együtt egy 16 bites címet határoz meg a video memóriában. Itt 
kezdődik a szín vagy attributum memória. Az attributum memória byte-jainak 
jelentéséről a 222. oldalon szóltunk. A színmemória kezdőértéke $800. 


22. regiszter (mátrix vízszintes, függőleges): MH3 MH2 MH1 MHO MV3 MV2 MV1 MVO 

Az MV3-MVO bitek a karakter szélességét adják meg. Ebbe a kijelzett karakter 
szélessége és a karakterek közti üres rész is beleértendő. Ha ilyen rész nincs, akkor ez 
az érték egyenlő az MH3-MH0O értékkel tt 1. Ha van karakterek közti rész, akkor az MV3- 
MVO bitek a karakter kijelzett része - 1 értéket adják pontokban mérve. Ha dupla széles 
karaktereket használunk, akkor a fenti értékhez hozzá kell még 1-et adni. 


Az MH3-MHO bitek a karakter vizszintes hossza - 1 értéket tartalmazzák pontokban 
mérve. Ez az érték a kijelzett rész és a karakterek közti üres részt is tartalmazza. Ha 
dupla széles kijelzést használunk, akkor az értékből az 1-et nem keli levonni. A 22. 
regiszter kezdeti értékét a C-128 120(-7"16r8)-ra állítja be, Ennek megfelelően egy 
karakter 8 raszterpont széles és nincs a karakterek közti üres hely. 


23. regiszter (függőleges kijelzés): -—— -- -- CD4 CD3 CD2 CD1 CDO 

A CD4-CDO bitek eggyel kisebb értéket adnak, mint ahány raszter sor van egy 
karakterben. Összehasonlítva ezt a 9. regiszter CV4-CVO értékeivel megkapjuk a sorok 
közti üres rasztersorok számát. A CD4-CDO érték kisebb kell hogy legyen a CV4-CVO 
értéknél. Kezdeti értéke 7, amit 232-nek lehet kiolvasni, mert a nem használt felső négy 
bit 1-et ad. Ez az érték 8 rasztersornak felel meg. 


24. regiszter (függőleges eltolás): COB RVS CRT SV4 SV3 SV2 SV1 SVO 

Az SV4-SVO bitek a függőleges eltolást adják meg raszter sorokban. A képernyő 
görgetéséhez lehet használni. Ha pl. értéke 1, akkor az első kijelzett raszter sor az első 
karaktersor második rasztersora lesz. Az utolsó sorban egy új karaktersor első 
rasztersora jelenik meg. Kezdőértékét a C-128 8-ra állítja be. 


A CRT bit a villogó karakterek villogásának gyorsaságát szabályozza. Ha ez a bit 
alacsony(0), akkor a karakterek lassabban, ha magas(1), akkor gyorsabban villognak. 


A RVS bit magasra(1) állításával az előtér/háttér színe megcserélődik. 


A COB bit a video memória blokk másolásához tartozik. Használatát a 30. regiszternél 
ismertetjük. 
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25. regiszter (vízszintes eltolás): TXT ATR SEM DBL SH3 SH2 SH1 SHO 
Az SH3-SHO bitek a vízszintes eltolás mértékét határozzák meg. A képernyő finom 
görgetéséhez lehet használni. A rendszer ezt 0-ra állítja be. 


A DBL bit a 80 oszlopos képernyőből 40 oszloposat készít. Ha a bit magas, minden 
egyes  képernyőpont szélessége kétszeresére nő. Természetesen a vízszintes 
megjelenítést befolyásoló értékeket újra kell programozni. 


A SEM bit lehetővé teszi kvázigrafikus karakterek kiíratását. A karakter kijelzett 
szélessége maximum 8 raszterpont lehet. Ha a SEM bitet magasra állítjuk a két karakter 
közti üres részen (ami normálisan háttér színű) a chip automatikusan megismétli az 
utolsó pont oszlopát. 


Az ATR bit magas(1) volta jelzi, hogy a chip használja-e az attributum memóriát vagy 
sem. Több esetben nincs szükség erre, ilyenkor a video memóriának ez a része másra 
használható. Ezt az ATR alacsonyra(0) állításával érhetjük el. Ekkor minden karakter a 26. 
memóriában levő előtér színnel jelenik meg. Mindössze egyetlen 256 karakterből álló 
karakterkészlet használható. 


A TXT bittel kapcsolhatunk át karakteres üzemmódból grafikusra és vissza. Karakteres 
kijelzés esetén ez a bit 0, különben 1. 


A C-128 ennek a regiszternek a tartalmát 64-re állítja be, ami az attributum 
bekapcsolását jelenti. 


26. regiszter (előtér/háttér színe): FG3 FG2 FG1 FGO BG3 BG2 BG1 BG0O 

Az FG3-FGO és BG3-BG0O bitek az előtér, illetve a háttér színét határozzák meg. A 
háttér szín a keret színe egyben. Az előtér színét a chip csak az attributumok 
kikapcsolása esetén (ATR-0) használja. A regiszter kezdeti értéke 240. 


27. regiszter (címnövelés): AI7 Al6 AI5 Al4 AI3 AI2 AI1 AIO 

Lehetőség van arra, hogy minden egyes karakter sor kijelzése után adott byte-ot a 
video memóriában átugorjon a 8563-as chip. Ennek hatására a kijelzett részt nem csak 
raszter, hanem karakter soronként is el lehet tolni. A soronként kihagyott byte-ok 
számát ez a regiszter adja. A C-128 ennek értékét 0-ra állítja be. 


28. regiszter (karaktermemória HI): CM2 CM1 CMO RAT -- -- -- -- 

A regiszter CM2-CMO bitjei a karaktergenerátor helyét határozzák meg a video 
memóriában. Ezek a bitek a kezdőcím felső három bitjét adják meg. Egy karakter 
memória rész 8192 byte-ból áll. A C-128 a karaktergenerátort $2000-re helyezi. 

A RAT bit a használt video memória típusát adja meg. Mivel a hardver adott, értéke 
kötelezően 0. A regiszter tartalma tehát 47. A nem használt bitek 1-esnek olvashatók ki. 


29. regiszter (aláhúzott sor): —— -—— -- UL4 UL3 UL2 UL1 ULO 

Ennek a regiszternek a tartalma adja meg, hogy hányadik raszter sort használja a 
rendszer aláhúzásra. A 0 érték a karakter első raszter sorának felel meg. Ha pl. 3-ra 
állítjuk, akkor a betűk nem alá-, hanem áthúzva jelennek meg. Kezdeti értéke: 7. Ez 
kiolvasva 231. 

30. regiszter (szószámláló): WC7 WC6 WC5 WC4 WC3 WC2 WC1I WCO 

A 8563 chip képes a video memória másolására, illetve egyetlen karakterrel való 
feltöltésére. Egyetlen megkötés, hogy ezt legfeljebb csak 256 byte-tal lehet megtenni. 


348 


Commodore 128 A 80 oszlopos video chip 


A karakter feltöltés hasonló a video memóriába való írással. A 18-19. regiszterekbe 
betöltjük az első írandó byte címét, majd a 31. regiszterbe beírjuk a feltöltendő byte-ot. 
Ezt követően a 24. regiszter COB bitjét alacsonyra állítjuk, s a 30. regiszterbe beírjuk a 
feltöltendő byte-ok számát. A regiszterbe való írás indítja el a feltöltést. A chip az adott 
számú byte-ba beírja a 31. regiszterben levő byte-ot. A művelet végén a 18-19. 
regiszterek az első olyan címre mutatnak, ahová nem került a karakter bemásolásra. 
Mivel a 31. regiszterbe való írás már maga beír egy byte-ot a video memóriába, ezért a 
30. regiszterbe már eggyel kisebb számot kell írni, mint ahány helyet a karakterrel fel 
akarunk tölteni. 


A video memória másolásakor ugyancsak a 30. regiszter tartalmazza az átmásolandó 
byte-ok számát. 


31. regiszter (adatregiszter): DAZ DAG6 DA5 DA4 DA3 DA2 DA1 DAO 
Az adatregiszter tartalmazza a 18-19. regiszterek által megcimzett video memóriában 
levő byte-ot. 


32. regiszter (blokk kezdete HI): BA15 BA14 BA13 BA12 BA11 BA10 BA9 BAB 

33. regiszter (blokk kezdete LO): BA7 BA6 BA5 BA4 BA3 BA2 BA1 BAO 

A 32-33. regiszterek egy 16 bites címet határoznak meg. A blokk másolás 
alkalmazásakor a video memória 32-33. regiszterei által meghatározott címtől a 30. 
regiszterben levő byte-ot másol át a chip a 18-19. regiszterek által meghatározott 
címre. A másolás (hasonlóan a video memória feltöltéséhez) a 30. regiszterbe történő 
íráskor kezdődik meg. Előtte kell beállítani a két címet, illetve a COB bitet. Ez utóbbi 
értéke 1 kell, hogy legyen. (Ellenkező esetben nem másolás, hanem feltöltés történik). 


34. regiszter (DISPEN kezdete): DS7 DS6 DS5 DS4 DS3 DS2 DS1 DSO 

35. regiszter (DISPEN vége): DE7 DE6 DE5 DE4 DE3 DE2 DE1 DEO 

A függőleges és vízszintes szinkronizáció alatt az RGBI információknak alacsonynak kell 
lenni (elkerülendő a képernyő villódzását). A két regiszter megadja, hogy mettől-meddig 
kell az RGBI információt törölni. Erre az időre az RGBI lábakon alacsony feszültség (-OV) 
jelenik meg. A C-128 ezt a két értéket 125-re és 64-re állítja be. 


36. regiszter (DRAM frissítés): -—— -—— —— -- -- RR3 RR2 RR1 RRO 

Az RR3-RRO értékek megadják, hogy egy raszter sorra hány memória frissítés jusson. 
Ez a frissítés mind a kijelzett, mind az üres sorokra vonatkozik. A C-128 ezt az értéket 
5-re állítja be. Kiolvasáskor ez 245-t ad, mert az értéktelen biteket a chip 1-nek 
olvassa. 
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10.3 A 8563 chip hardver specifikációja 


Kapcsolat a processzorral 
A 8563 és a 8502 (vagy Z80) közötti kapcsolat a lehető legegyszerűbb (hála a 
kommunikációs regisztereknek). A kapcsolat az alábbi jelek segítségével valósul meg: 


- Do-D7: Kétirányú adatbusz, amelyiken a 8502 és a 8563 adatot cserél. 

- CS: chip kiválasztó jel. Ez a jel magas kell hogy legyen a chip helyes működéséhez. A 
jelet a PLA állítja elő. 

- /CS: chip kiválasztó jel. Ennek alacsonynak kell lennie a chip helyes működéséhez. 
Ugyancsak a PLA állítja elő. 

- /RS: regiszter kiválasztása. Ha a vonal magas, akkor lehetőség van a regiszterek 
olvasására és írására. Ha alacsony, akkor lehetőség van az állapotregiszter olvasására 
és az adatregiszter írására. 


- R/W: az adatbusz irányát szabályozó jel. 


- INIT: alacsonyra vitele törli a chipet. A C-128-on ez a vonal össze van kötve a /RES 
vonallal. 

- DISPEN: a kijelzést engedélyező output jel. A C-128 nem használja. 

- RES: Ez a jel inicializálja a video kijelzést irányító számlálókat. A regiszterek tartalma 
nem változik. A C-128 nem használja, be sincs kötve. 

- TST: tesztelési célokra szolgál. A C-128-on le van földelve. 


A következő legfontosabb jelcsoport az, amivel a 8563 a saját video memóriájával tart 
kapcsolatot. Ezek a következők: 

DD9-DD7: Kétirányú lokális adatbusz a DRAM-hoz. 

- DAg-DA7: multiplexelt címbusz. 

DR/W: a lokális busz irányát meghatározó jelző. 

/RAS: sor cím jelző a DRAM-nak. 

- /CAS: oszlop cím jelző a DRAM-nak. 


Az utolsó csoportba azok a jelek tartoznak amelyek az RGBI monitor képét előállítják: 


DCLK: video pont órajel. Meghatározza a pont méretét. Ezt használja a chip 
valamennyi belső időzítéséhez. 

- CCLK: karakter órajel, a C-128 nem használja. 

- LP2: bemenet a fényceruzától. Ezen a lábon egy pozitiv átmenet beírja a fényceruza 
helyzetét a megfelelő regiszterekbe. 

HSYNC: szinkronizációs jel. 

R.G.B.l: kimenő szín és intenzitás jelek. 
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A 8563 chip lábkiosztása 


at jé PHGEN 


Si PH.CL 
23]02 
4103 KO 
31ou KI 
2]os k2 
-1]06 
ZA [9 LP 
245108 
a413]09 ZBO PH 
a4ID10 IMHZ 
szot 2MHZje3, 
—T /tomcc[22a 
31 All (1) mubke 
szan LM  /cRSES, 
3 21 
5-—IAl MUX 
$41A2 CM 
351a3 R/WU5 
35]au csi, 
er ábi 7/1808, 
38 
AG 
39]A7 BAjLO 
10]AB AEC[12, 
a11]ag 
42IA10 EL 
15 
falkzgés [7 
3HSTNC 
vss 
2u 
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10.4 Programozási példák 


Az alábbiakban egy rutingyűjteményt adunk meg, amelyek a 80 oszlopos video chip 
grafikájának használatát könnyítik meg: CP/M-ben. A könyv végén példát mutatunk 
olyan Turbo Pascal példákra, melyek EXTERNAL eljárások és függvényekként használják 
ezeket. 


A program elején egy ugrótábla található, aminek a segítségével lehet az egyes 
rutinokat használni. A Turbo Pascallal való kapcsolattartás miatt a rutinok a veremből 
kapják a paramétereiket. A leírásnál szereplő adatokat az ott megadott sorrendben kell 
a verembe helyezni. Mindegyik paraméter két byte-os. Ha értelemszerűen csak egy 
byte-os érték lehet, akkor a felső byte-ot 0-nak kell beállítani. 


A rutinok funkciója rendre a következő: 


move$to A proceszor memóriából a VDC memóriájába másol. A verembe a kezdőcimet, 
a másolandó byte-ok számát és a VDC memóriában a kezdőcímet kell beállítani. 


move$from A VDC memóriájából a processzor memóriájába másol. A verembe az ada- 
tokat a rutin meghívása előtt ugyanúgy kell beállítani, mint az előző esetben. 


VvDC$reg$write A VDC adott regiszterébe ír egyetlen byte-ot. A veremben az adatokat, 
a regiszter sorszámát, s annak értékét kell behelyezni. 


VDC$read A VDC adott regiszterének értékét olvassa ki. A veremre a regiszter 
sorszámát kell helyezni. A rutin a regiszter értékét visszateszi a veremre. 


set$point A VDC memóriájában egy adott bitet magasra állít. A verembe a memória 
címét és a bit sorszámát kell betenni. 


reset$point A VDC memóriájában egy adott bitet alacsonyra állít. A verembe a memória 
címét és a bit sorszámát kell betenni. 


test$point A VDC memóriájából kiolvassa, hogy egy bit magas, vagy sem. A verembe a 
memória címét és a bit sorszámát kell betenni. Visszatéréskor a verem tetején levő 
érték 0, ha alacsony; 1, ha magas a bit. 


title "graphic routines for Turbo" 
maclib 280 
org 0e000h 

i0$1 egu OffO04h 

bank$1 egu OffO2h 


; jump table for routines 


jp move$to ; trom memory to video 
jp move$from ; trom video to memory 
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jp VDC$reg$write ; VDC register write routine 

jp VDC$reg$read  ; VDC register read routine 

jp set$point ; turn a pont on 

jp reset$point ; turn a point off 

jp test$point ; test if a point on 
move$to: 

pop h ; return address in HL 

pop d ; FROM in DE 

pop b : NUMBER in BC 

xthl ; TO in HL, return address on stack 

push b ; NUMBER on stack 
sta i0$1 ; io turn on! 
move$char$to: 

call set$update$adr 

pop hi ; NUMBER in HL 
move$one$char$to: 

Idax d 

outp a 

der c . 

inx d 
write$wait: 

inp a 

ral 

jrne write$wait 

inr 18) 

decx h 

mov a,h 

ora l 

jrnz move$one$char$to 

sta bank$1 ; io turn off 

ret 
wait: 

push psw 

lxi b,0d600h 
wait$loop: 

inp a 

ral 

jrnc wait$loop 

pop psw 

outp a 

inr € 

ret 
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set$update$adr: 


muvi a, 18 
call wait 
outp h 
mvi a, 19 
call wait 
outp l 
mvi a 31 
call wait 
der c 


update$wait: 


inp a 

ral 

jirne update$wait 

inr c 

ret 
j VDC register write 
VDCS$reg$write: 

pop nh 

pop de 

xthl 

mov al 

call wait 

outp e 

ret 
3. VDC register read 
VDCS$reg$read: 

pop hi 

xthl 

mov a,l 

call wait 

inp l 

xthi 

push h 

ret 
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FA hi! - pointer to video memory 
bj a 7- bit affected 


set$point: 
pop h ; return address 
pop d ; de — bit affected 
xthi 
push h 
call set$update$adr 
inp b 
mov ae 
slar a 
slar a 
slar a 
ori 0c7h ; z 711000111 
sta set$bitt1 
mov a,b 
set$bit: 
setb a,0 
pop n 
push psw 
call set$update$adr 
pop psw 
outp a 
ret 
; reset point 
7 hl - pointer to video memory 
FH a - bit affected 
reset$point: 
pop h ; return address 
pop d ; de - bit affected 
xthi 
push h 
call set$update$adr 
inp b 
mov ae 
slar a 
slar a 
slar a 
ori 87h ; - 710000111 
sta reset$bitt1 
mov a,b 
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reset$bit: 
setb 
pop 
push 
call 
pop 
outp 
ret 


7 test 


F hi 


; e JöVizz 


test$point: 
pop 
pop 
xthl 


call 
inp 
mov 
slar 
slar 
slar 
ori 
sta 


mov 

test$bit: 
bit 
irnz 
lxi 
xthl 
push 
ret 


no$point: 
lxi 
xthi 
push 
ret 
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ao 
h 
psw 


set$update$adr 


psw 
a 


if point is on 


pointer to video memory 


bit affected 


set$update$adr 


b 

ae 

a 

a 

a 

47h 
test$bitt1 


ae 
a,0 
no$point 


h,1 


h 


h,0 


; return address 


" ; de - bit affected 


; a 5 bit affected 


; z HO1000111 


move from video to memory 
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move$from: 

pop h 

pop d 

pop b 

xthi 

push b 

sta i0$1 

call set$update$adr 

pop h 
move$from$one: 

der c 
wait$from: 

inp a 

ral 

jrne wait$from 

inr c 

inp a 

stax d 

inx d 

dex h 

mov a,h 

ora l 

jrnz move$from$one 

sta bank$1 

ret 

end 

ret 

end 
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Arra az esetre, ha valaki nem rendelkeznék makro assemblerrel megadjuk a fenti file 
fordítás után keletkezett .HEX típusú file tartalmát. Ez ASCII file, így pl. az ED-vel vagy a 
. Turbo Pascal szövegszerkesztőjével is beírhatjuk. 


:10E00000F215EOF2DAEOF25EE0F268E0F273EOF2DC 
:10E0100094EOF2B5EO0OE1D1C1E3CS3204FFCD43E0C5 
:10E02000E11AED790D13ED781730FBOC2B7CB52040 
:10E£03000F0O3202FFC9F50100D6ED781730FBFL1EDA3 
:10E£04000790C€C93E12CD35E0ED613E13CD35E0EDE2 
:10E05000693E1FCD35E00DED781730FBOCC9El1D1DD 
:10E06000E37DCD35E0ED59C9E1E37DCD35E0ED68E7 
:10E£07000E3ESC9E1D1E3E5CD43E0ED407BCB27CB40 
:10E£0800027CB27F6C7328AE078CBF8E1F5CD43E01D 
:10E09000F1ED79C9SE1D1E3E5CD43E0ED407BCB275C 
:10E0A000CB27CB27F68732ABE078CBF8E1F5CD4331 
: 10EOBOOOEOF1ED79C9E1D1E3CD43E0ED407BCB2741 
:10E0C0O0O0OCB27CB27F64732CBEO7BCB78200621014C 
:10E0D00000E3E5C€9210000E3ES5C9E1D1C1E3C532B0 
:10E0E00004FFCD43E0E10DED781730FBOCED781225 
:0AE0FO00132B7CB520FO3Z32OZFFCJAB 

:0000000000 
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11. fejezet 


A CP/Mt V3.0 használata 


11.1 A lemezegységek használata 


A 4. fejezetben a Commodore 128 CP/Mt operációs rendszerének alapjait ismertettük. A 
mostani fejezet az ott közöltektől lényegesen mélyebben tárgyalja az operációs 
rendszer egyes funkcióit, illetve azok használatát. A fejezet megértéséhez ismerni kell a 
4. fejezetben elmondottakat, továbbá rendelkezni kell bizonyos 2780-as alapismeretekkel. 
Ez utóbbi az ajánlott irodalomjegyzék Z280-as könyveiből megszerezhető. 


Több lemezegység használata 

A C-128 CP/Mr (szemben a C-64 CP/M bővítésével) lehetőséget biztosít több 
lemezegység használatára is. Ebben az esetben az operációs rendszer betöltésére nem 
használhatjuk az "autoboot" funkciót. 


Először a demonstrációs lemezen levő program segítségével a második, harmadik 
lemezegységet átszámozzuk a 9-es, 10-es hardver számú egységekre. Ezután - nem 
kikapcsolva a C-128-at - behelyezzük a 8-as lemezegységbe a CP/Mt rendszerlemezt 
és kiadjuk a BOOT BASIC parancsot. Ennek hatására a C-128 betölti és elindítja a 
CP/Mr operációs rendszert. A BOOT nem inicializálja a lemezegységeket, ezért a 
rendszer bejelentkezése után is 9-es, 10-es egységként használhatjuk az átszámozott 
egységeket. A CP/M-ből ezekre A:, B: C: névvel használhatjuk. 


Ha a lemezegységeket fizikailag is átszámoztuk, akkor a szokásos eljárást használhatjuk: 
a rendszerlemezt a gép bekapcsolása előtt behelyezzük a 8-as lemezegységbe, majd 
bekapcsoljuk a gépet. ű 


A CP/Mtr rendszer használatához célszerű két gyors (1570 vagy 1571 jelű) 
lemezegységet használni. Különösen a másolások gyorsulnak meg; pl. a COPY b:"."-a: 
parancs hatására a teljes a: lemez átmásolódik a b7 lemezre. Ha egyetlen 
lemezegységünk van csak, akkor a fiktiv e: lemezegységet kell használnunk, s file- 
onként cserélni a lemezeket! 


Fenntartott file-név típusok 

A CP/M-t rendszerben a file-ok nevei egy maximum három karakterből álló típussal 
(kiterjesztéssel) végződhetnek. Ezek közül bizonyosakat a rendszer parancsai és a nyelvi 
fordítók használnak, ezeket nem célszerű másra használni. Ezek - a rendszer jelenlegi 
fejlesztési stádiumában - a következők: 


File típus Jelentés 

ASM assembler forras nyelvi lista 
BAS BASIC forrás nyelvi lista 

COM 780 abszolút című gépi program 
HEX Intel HEX formájú program 

HLP információs file-ok 

$$$ ideiglenes file-ok 

PRN MAC és RMAC nyomtatási file-ja 
REL RMAC outputja (LINK-hez kell) 
SUB SUBMIT-hoz adatfile 

SYM szimbolum tábla (MAC. RMAC vagy LINK) 
RSX rezidens rendszerbővítő file 


359 


A CP/M megvalósítása Commodore 128 


Lemezformátumok 

A C-128 CP/M: több fajtájú lemez írását/olvasását, egyesek formázását támogatja. A 
rendszernek ez a része még jelenleg is fejlesztés alatt áll, ezért további módosítások 
várhatók. 


A C-128 CP/M4 három Commodore GCR formátumú lemezt támogat. Ezek sorban a 
következők: 


C-64 egy oldalas lemez: ez a lemezformátum azonos a CP/M 2.2 által a Commodore 
64-en használt lemezformátummal. Az FCB ebben az esetben 32 sávot, sávonként 17 
szektort tartalmaz. A BIOS automatikusan 1-gyel megnöveli a sáv számot, ha az 18, 
vagy annál nagyobb. (Az I. kötetben szereplő, a lemezre közvetlenül író/olvasó példa 
ugyanezt a módszert használja!) A rendszer 0. és 1. sávja (fizikailag az 1. és a 2.) 
fenntartott a rendszerfile-ok számára. 


C-128 egy, illetve kétoldalas lemez: A második lemezformátumot már a 1570 és 1571- 
es lemezegységekre tervezték, s a lemez valamennyi blokkját használja. Ezt azzal a 
fogással érték el, hogy az FCB 638 (1276) 1 szektoros sávnak tekinti a lemezt. A logikai 
és a fizikai sávok közti transzformációt a következő táblázat adja meg: 


Logikai sáv(S) Fizikai sáv 
000-354 ((S42)/21)11 
355-486 ((5-354)/19)18 
487-594 ((S5-487)/18)425 
595-638 ((5-595)/17)531 
639-1276 a második oldalon S-639-el s a fenti átszámítással 


A fenti képletben az osztásnak természetesen az egész részét kell venni. A maradék a 
logikai szektor számot adja, amit még az adatátvitel gyorsítása érdekében tovább 
transzformál a rendszer: 


Sávok . Szektorok 
02 2 39 S € 78. 0003 TB 13 44 15 16 37 18 19 209 


0-16 00 17 13 09 05 OL 18 14 10 06 02 19 15 11 07 03 20 16 12 08 04 
17-23 00 04 08 12 16 01 OS 09 13 17 02 06 10 14 18 03 07 11 15 
24-29 00 11 04 15 08 01 12 OS 16 09 02 13 06 17 10 03 14 07 
30-34 00 07 14 04 11 01 08 15 05 12 02 09 16 06 13 03 10 
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11.2 Memóriaszervezés 

Már a 4. fejezetben is utaltunk rá, hogy a CP/Mt a memóriát a C-128-as módtól 
eltérően használja. A 4. fejezetben levő általános sémával ez ugyan összhangban van, 
de a CCP, a BIOS és a BDOS rendszerkomponenseknek a TPA területen csak darabjai 
vannak, aminek segítségével a CP/Mt képes ezeknek a rutinoknak a másik 64K-s 
memória szeleten levő darabjait meghívni. Ez még egy 4 Kbyte-os ROM-ot is tartalmaz. 


A TPA terület 64K-s szelete mindössze annyi információt és programrészt tartalmaz, 
ami elegendő arra, hogy a BDOS, illetve BIOS rutinok az átlapolt részre adják a 
vezérlést. Magán az átlapolt részen találhatók a rutinok "érdemi" részei. Ez a technika 
eredményezi, hogy a felhasználói programok számára 59 Kbyte áll rendelkezésre, ami 8 
bites gép esetén igen nagy terület. 


CP/M-t memóriafelhasználás 


0. 64K-s szelet 1. 64K-s szelet 


MMU regiszterek 
regisztere $FFO0 


I Közös rendszermemória l 


elése 
os 1lOS $EE00 


—————— ———— $E000 


Rendszerprogramok 
(átlapolt része) 


hall 


$9C00 
j Szabad terület l 
l j 
cCCP — TPA $4000 
VIC képernyő 
8502 BIOS 
40 oszlopos logikai $2600 
képernyő 
$1000 
I Z80 alap ROM l 
$0000 
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A 0. szelet használata 
Cím Leírás 


0000 - OFFF 7Z80-as ROM (4Kbyte) 

1000 - 13FF billentyűzet definíció 

1400 - 23FF 80 oszlopos logikai képernyő 
2400 - 25FF CP/M paraméter blokk 

2600 - 2BFF BIOS 8502 kód 

2COO - 2FFF VICII képernyő memória 
3000 - 3C80 CCP puffer 

4000 - 9BFF szabad terület 

9CO0 - CNSFF BDOS átlapolt rész 

CAOO - EDFF BIOS átlapolt rész 

EEO0 - F3FF BDOS rezidens rész 

F400 - FBFF BIOS rezidens rész 

FCOO - FCFF megszakítási vektorok 

FDOO - FDFF rendszer paraméterek a közös részben 
FEOO0 - FEFF lemez puffer 


FFOO  - FFFF MMU és átkapcsoló rutinok 


Az 1. szeleten levő memóriakiosztás felel meg a CP/M szabványnak. Ennek megfelelően 
a rendszer a 0. lapot a következőképpen használja: 


Az 1. szelet használata 
Cím Leírás 


0000H4H-O002H JP WBOOT utasítás (JP F403 

0003H foglalt 

0004H foglalt 

0005H-0007H JP BDOS utasítás (JP EEO6 ha nincs aktiv RSX) 

0008H-OOZAH  RST utasításoknak fenntartva 

003BH-O04FH szabad terület 

0050H annak a lemezegységnek az azonosítója, ahonnan a programot 
betöltöttük 

0051H-OO5Z2H mutató: az első FCB jelszavára 
z 0, nem adtunk meg jelszót 


0053 az első FCB-hez tartozó jelszó hossza 
Í; z 0, nem adtunk meg jelszót j 
0054-0055 mutató: a második FCB jelszavára 
ma 0, nem adtunk meg jelszót 
0056H a második FCB-hez tartozó jelszó hossza 


z 0, nem adtunk meg jelszót 
0057H-OO5BBH szabad terület 
005CH-O0O7BH File Control Block 1 
006CH-OO7ZBH File Control Block 2 
Ha két file-t is megadunk, akkor a FCB-ket át kell másolnunk, mert az 
első vége fedi a második elejét 
007CH az FCB1 rekordszáma 
007DH-OO7FH File Control Block készítése 
a közvetlen írású rekord sorszáma 
0080H-OOFFH 128 byte-os puffer terület lemezműveletekhez 


0100H- Felhasználói programterület 
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11.3 A CP/M munkaterületei 


A CP/Mt a lemezekkel való adatcsere biztosításához az ún. FCB-ket (file control blokk) 
használja. Az FCB-k alakja azonos a lemezen a katalógusbejegyzésekkel. 


A rendszerváltozók karbantartására a CP/M külön memóriarészt tart fennt, ez az SCB 
(system control blokk), amelyik 100 byte-ja az elsődleges kommunikációs terület a 
rendszer egyes elemei között. 


11.3.1 Az SCB felépítése 


Az SCB egyes elemeit a BDOS funkciók automatikusan  átállítják. A  49-es 
funkcióhívással azonban közvetlenül is lekérdezhetjük/átállíthatjuk ezeket az értékeket. 
Az alábbiakban a csak olvashatónak (RO) nevezett változók felülírása azonban 
tönkreteheti a rendszert. 


00-04 RO A rendszer számára fenntartott 

05 RO  BDOS verziószám 

06-09 A felhasználó számára fenntartott hely, szabadon lehet használni. 
0A-OF RO A rendszer számára fenntartott 

10-11 Program visszatérési kód. Ez a program használható a hiba miatti 


programmegállás jelzésére. A BDOS 108-as funkcióval közvetlenül 
írható/olvas ható. 


12-19 RO Arendszer számára fenntartott 

1A A konzol sor szélessége. Ez az érték általában 79, de a DEVICE parancs 
segítségével megváltoztatható. 

1B RO A HKkonzol pillanatnyi oszlop pozíciója 

te A konzol lapmérete. Ez általában 24, de a DEVICE paranccsal ez meg- 
változtatható. 

19521 RO A rendszer számára fenntartott 

22-2B A CP/Mt BIOS 12 fizikai eszközt képes. A fenti byte-ok azt mutatják, 


hogy a CP/Mt logikai eszközei mely fizikai perifériákhoz tartoznak. A 
logikai-fizikai hozzárendelést egy 16 bites szó adja meg. A legmaga- 
sabb bit a 0-ás fizikai eszköznek felel meg. A 4. bit a 11-es sorszámú 
fizikai eszközt jelenti. A 3-0 biteknek nincs jelentése. 
Két byte-osával az alábbi sorrendben következnek az összerendelések: 
CONIN, CONOUT, AUXIN, AUXOUT, LSTOUT. 

2c Lapozási mód jelzője. Ha ez az érték nullától különböző, akkor a képer- 
nyőre írás folyamatos, ha nem, akkor az SCB 1CH byte-jában levő szá- 
mú soronként megáll a kiírás. Az indítás és megállítás a CCTRL-S5, 
illetve a CCTRL-OA5 billentyűkkel történik. 

2D RO Arendszer számára fenntartott 

2E Megadja, hogyan működik a CCTRL-H5 karakter. Ha 0, akkor a 
SxCTRL-H5 visszalép és töröl. Ha OFFH az értéke, akkor a billentyű tö- 
röl, de nem lép vissza, hanem újból kiírja a törölt karaktert. 

Ze Megadja, hogyan működik a CDEL5 karakter. Ha OFFH, akkor a CDEL5 
visszalép és töröl. Ha 0 az értéke, akkor a billentyű töröl, de nem lép 
vissza, hanem újból kiírja a törölt karaktert. 


30-32 RO A rendszer számára fenntartott 

33-34 Konzol mód jelzése. A lehetséges üzemmódokat a 109-es BDOS funk- 
ció leírásánál adjuk meg. 

35-36 RO Arendszer számára fenntartott 
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37 A sztring végét jelző karakter. (Lásd a 110-es funkciót!) 

38 Listázást jelzi. Ha 0, a konzol output nem jelenik meg a listázó periféri- 
án. Ha 1, akkor igen. 

39-3B RO Arendszer számára fenntartott 


3C-3D RO Apjelenlegi DMA terület címe. Ennek értéket csak a 26-os BDOS funk- 
ció segítségével állítsuk! A CCP a DMA területet 0080H-ra állítja be. 


3E RO Az aktuális lemezegység (A-0, B-1, stb.). 

3F-43 RO Arendszer számára fenntartott 

44 RO Az aktuális felhasználói szám. A lehetséges értékek 0-15. 

45-49 RO Arendszer számára fenntartott 

4A A BDOS többszektoros átviteleknél egyszerre ennyi szektort visz át. 

4B A BDOS hibamódjának kódja. Jelentését lásd a 45-ös funkcióhívás 18- 
írásánál. 

4C-4F Keresési sorrend. A SETDEF paranccsal beállított lemez keresési sor- 


rendet határozza meg. Az első byte az elsőnek, a második a második- 
nak stb. keresendő lemezegység kódját tartalmazza. Az aktuális lemez- 
egység - 0, A-1, B-2, stb. Ha kevesebb, mint 5 egységen kell keresni, 
akkor a többi byte értéke OFFH. 


50 Ideiglenes file-okat tároló lemezegység azonosítója. O-aktuális, A-1, 
B-2 stb. 

51 RO Hibás lemezegység. Annak a lemezegységnek az azonosítója, ahol 
utoljára hibát érzékelt a BDOS. 

52-56 RO Arendszer számára fenntartott 

57 RO Ha a 7. bit magas, akkor a rendszer bővített hibaüzeneteket küld. 

58-59 Dátum - az 1978 január 1-e óta eltelt napok száma. 

5A Óra (binárisan kódolt decimális szám, két decimális jegy). 

5B Perc. 

5C Másodperc. 

5D-5E RO Közös memória kezdőcíme. 

5F-63 A rendszer számára fenntartott 


Az FCB felépítése 


A CP/Mt a lemezen levő katalógusban tünteti fel, hogy milyen file-ok vannak a 
lemezen ,s azok hol helyezkednek el. A katalógus 32 byte-os bejegyzéseket tartalmaz, 
amelynek első byte-ja dönti el, hogy mire vonatkozó bejegyzést tartalmaz. 


Ha az első byte értéke 0-15, akkor az a vele megegyező felhasználói számú file-ra 
vonatkozó bejegyzés. 


Ha az érték 16-31, akkor az egy, 15-tel kisebb felhasználói számú file kiterjesztett file 
kontroll blokkját tartalmazza (XFCB). Ez tartalmazza a file jelszavát és a védelem módját. 
Ilyen bejegyzés a katalógusba csak akkor lehet, ha a megfelelő funkciók segítségével 
létrehoztuk. 


Ha az első byte 32, akkor a szóbanforgó bejegyzés a lemez címkéjét tartalmazza. Ennek 
része a lemez neve, a védelem módja, a létrehozás és a módosítás ideje. 


Egészen speciális az olyan katalógusbejegyzés jelentése, amelyik 33-mal kezdődik. Ez 
csak a 128 byte-os logikai szektor utolsó 32 karakteres bejegyzése lehet. Ebben az 
esetben az INITDIR parancs kiadásával megengedtük az időfigyelést a lemezen, s 33- 
mal kezdődő katalógusbejegyzés az őt megelőző három másik bejegyzésre vonatkozó 


364 


Commodore 128 A CP/M megvalósítása 


idő adatokat tartalmazza. Egy y időadatsor 10 byte-ból áll, s tartalmazza a védelem 
módját jelző byte-ot is. 


Az FCB utolsó 16 byte-ja a file-hoz tartozó lemezterületek logikai sorszámát 
tartalmazza. 


A BDOS funkcióhívásoknál használt FCB-k az első byte-jukban eltérnek a katalógus 


bejegyzésektől: itt a felhasználói számát adják, ott a lemezegységet azonosítják. 
0-aktuális, 1-A, B-2, stb. egészen P-ig. A 20-23. byte a lemezre nincs felírva. 


Az FCB byte-jainak a jelentése a következő: 


00 lemezegység kódja 

01-08 file neve balra igazítva s szóközökkel feltöltve. 

09-OB a filenév kiterjesztése balra igazítva s szóközökkel feltöltve. 

0Cc a file-t leíró katalógusbejegyzések közül ez hányadik. Az értéke a 0-31 in- 
tervallumba eshet. 

0E-OD a rendszer használja. 

OF a 0C-ben megadott értékhez képest a rekordsorszám. Lehetséges értéke 
0-255. 

10-1F a file-hoz tartozó file-területek logikai sorszáma. 

20 az olvasó/író műveletekben az aktuális rekord sorszáma (a 0C-ben levő ér- 
tékhez képest). 

21-23 a közvetlen rekordműveletek sorszáma. Maximális értéke 3FFFFH lehet. 


Az FCB file-név mezőjének 7. bitjeit ún. attributum (jelző) biteknek használja a rendszer. 
Ezekre a bitekre az alábbiak szerint hivatkozunk: 


fi f2 f3 f4 f5 f6 f7 f8 tl t2 t3 
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11.4 BDOS funkcióhívások 


A CP/Mt a BDOS funkcióhívások esetén az alábbi általános szabályokat követi. A C 
regiszter tartalmazza a funkció számát, míg a DE regiszterpár tartalmazza egy byte-t 
vagy szót, azt az információt, ami a művelet végrehajtásához szükséges. Egy sor 
esetben a DE-ben egy mutatót kell betölteni, ami az FCB-re, a DMA-ra vagy a SCB-re 
mutat. A BDOS funkciók az egybyte-os értékeket az A regiszterben, a szó értékeket a 
HL regiszterben adják vissza. Ezen túl az A és L, illetve a H és B regiszterek értéke 
megegyezik. 


0-ás funkció: rendszer újraindítása 


A funkció meghívása ekvivalens a CP/M 3 meleg startjának végrehajtásával, amit egy 
JMP 0000H utasítással is elérhetünk. A funkció nem inicializálja a lemezes alrendszert! 
A funkciót hívó program a következő programnak a 108-as funkció segítségével adhat 
át visszatérési kódot. 


Példa: 
Ildi c,0Oh 
all bdos 


1-es funkció: konzol input 

A funkció a konzolról egyetlen karaktert olvas, s azt megismétli a képernyőn. A 
program addig nem tér vissza a hívott programba, míg valamelyik input eszközről nem 
érkezik egy karakter. 


Példa: 
Ildi c,O1h 
call bdos 
sta char 


, 


char db 0 


2-es funkció: konzol output 
A funkció a konzolra kiírja az E regiszterben levő karaktert. Amennyiben a CCTRL-P: 
segítségével a nyomtatót bekapcsoltuk, akkor a karakter a nyomtatón is megjelenik. 


Példa: 
Ida char 
mov ea 
Idi c,O2h 
call bdos 


, 


char db 0 


3-as funkció: input az AUX: perifériáról 
A funkció az AUX:-nak kijelölt perifériáról olvas be az A regiszterbe egyetlen karaktert. 


Példa: 
Idi c,03h 
call bdos 
sta char 
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char db 0 


4-es funkció: output az AUX: perifériára 
A funkció az AUX:-nak kijelölt perifériára küldi el az E-ben levő karaktert. 


Ida char 
mov ea 
Idi c,04h 
call bdos 


char db 0) 


5-ös funkció: irás a listázó perifériára 
A funkció az LST: perifériára küldi el az E regiszterben levő értéket. 


Ida char 
mov ea 
Ildi c,05h 
call bdos 


, 


char db 0 


6-os funkció: direkt konzol I/O 
A funkció segítségével lehetőség van a CONIN: perifériáról közvetlenül olvasni, anélkül, 
hogy a CP/M 3 ezeket értelmezné. Az olvasás módja az E regiszter tartalmától függ. 


E: Offh Ebben az esetben a funkció az utoljára beolvasott karakter ASCII kódját adja 
vissza az A regiszterben, ha ez 0, akkor nem érkezett karakter. 
E: Ofeh A funkció nem olvas be karaktert a konzolról, csupán annak státusát kérdezi 


le. Ha az A regiszterben 0-t ad vissza, akkor nem érkezett karakter. Különben 
az A értéke Offh. 

E: Ofdh A funkció a CONIN:-ről beolvas egyetlen karaktert, s annak ASCII értékét az 
A regiszterbe helyezi. A funkció addig nem tér vissza, míg az első karaktert 
be nem olvasta. 

E: egyéb Az előzőektől eltérő esetben a BDOS feltételezi, hogy az E regiszter egy ér- 
vényes karakter ASCII kódját tartalmazza, s elküldi a CONOUT: logikai perifé- 
riára. 


7-es funkció: AUX: input státuszának lekérdezése 
A funkció az A regiszterben az AUXIN: logikai periféria állapotjelzőjét adja vissza. Értéke 
Offh, ha érkezett karakter, s OOh, ha nem. 


Példa: 

Ildi c,07h 

call bdos 

ora a 

jnz read$char 
read$char ... 
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A vezérlés akkor kerül a read$char címkére, ha az AUXIN: készen áll egy karakter 
küldésére. 


8-as funkció: AUX: output státuszának lekérdezése 


A funkció az A regiszterben az AUXOUT: logikai periféria állapotjelzőjét adja vissza. 
Értéke Offh, ha a periféria képes karakter fogadására, s OOh, ha nem. 


Példa: 

Ildi c,08h 

call bdos 

ora a 

jnz write$char 
write$char 


A vezérlés akkor kerül a write$char címkére, ha az AUXOUT: készen áli egy karakter 
fogadására. 


9-es funkció: sztring kiírása a konzolra 
A funkció a DE által mutatott sztringet kiírja a CONOUT: logikai perifériára. A sztring- 
nek egy $ jellel kell végződnie. A $ már nem kerül kiírásra. 


Példa: 
Idi c,0O9h 
lxi d massege 
call bdos 


message "ltt a vege$" 


10-es funkció: konzol formázott olvasása 

A funkció a CP/M 3 input pufferében megszerkesztett karaktersorozatot olvassa be az 
általunk adott munkaterületre. Ennek a kezdőcímét a DE regiszterpárban kell 
beállítanunk. A puffer első eleme a puffer hosszát kell hogy tartalmazza. A funkció 
meghívása után a képernyőn megjelenik a kurzor, s a válasz beírása után a 
megszerkesztett sort a funkció átmásolja a pufferbe. A puffer második eleme a 
beolvasott karakterek számát tartalmazza, ezeket követik a beolvasott értékek. 


Ha a DE regiszterpár értéke 0, akkor a rendszer a DMA pufferben egy inicializált 
karaktersorozatot vár. Ehhez a puffer harmadik helyétől kezdve a kezdő 
karaktersorozatot kell elhelyezni, egy 0 byte-tal lezárva. 


Példa: 
lxi d. buffer 
Ildi c,1ah 


Ildi hmassege 
Idi d bufferr2 
Ildi b,05h 

Iddr; 


lxi d. buffer 


Ildi cDah 
call bdos 
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message: db "none", 00h 
buffer: 
buff$length: db 126 
buff$number: db 0 

ds 126 


11-es funkció: konzol állapotának lekérdezése 


A funkció a CP/Mt konzol perifériájának, a CONIN:-nek az állapotával tér vissza az A 
regiszterben. Az A értéke O1H lesz, ha van karakter a karakterpufferben. Ha nincs, akkor 
az A értéke a visszatéréskor 0. 


Ha a konzol CTRL-C üzemmódban van, akkor a 11-es funkció csak akkor tér vissza 
01H-val, ha az érzékelt karakter CTRL-C volt. 


Példa: 
Ildi c,Obh 
call bdos 


12-es funkció: verzió szám lekérdezése 
A funkció HL-ben a CP/Mi verziószámával tér vissza. H 0-t tartalmaz, jelezve a CP/M- 
et, L pedig (hexadecimális) 31-et tartalmaz, ami a BDOS file rendszer verziószáma. 


13-as funkció: a lemezrendszer inicializálása 

A 13-as funkció a lemezrendszert inicializálja. Ennek következtében valamennyi 
lemezegység Írható/olvasható lesz, a default (aktuális) lemezegység az A lesz, s a DMA 
cím értéke 00804H. 


14-es funkció: lemezegység kiválasztása 


A 14-es funkció segítségével megváltoztathatjuk az aktuális lemezegységet. A funkció 
meghívása előtt a lemezegység azonosítóját az E regiszterbe kell elhelyezni. A-1, B-2 
stb. Ezen túl a funkció a kiválasztott lemezegységben levő lemezt be is lépteti a 
rendszerbe. 


Visszatéréskor az A regiszter értéke 0, ha nem történt hiba. Ha fizikai hiba történt, akkor 
a funkció befejezése a kiválasztott hibamódtól függ. Alapállapotban a konzolon 
megjelenik a hiba okára utaló üzenet, s a hívó program futása befejeződik. Ellenkező 
esetben a funkció visszatér a hívó programhoz az A regiszterben a OFFH értékkel. H 
tartalmazza a hiba okát: 


01 : lemez I/O hiba 
04 : érvénytelen lemezegység azonosító (216 vagy -0) 


15-ös fukció: file megnyitása 


A funkció meghivaáasakor a DE egy nem megnyitott FCB-re mutat. Az FCB 0. byte-ja a 
lemezegység azonosítóját, 1-11. byte-jai a nevét, 12. byte-ja a file-darab sorszámát 
tartalmazza. 


Ha a file olvasással szemben jelszóval védett, akkor a jelszót a DMA első 8 byte-jára 
kell helyezni. 


Ha a hívó program felhasználói száma nem O, s ha a 0-ás felhasználói szám alatt nem 


találja a file-t, akkor megpróbálja a 0-ás felhasználói szám alatt megnyitni. Erre 
azonban csak akkor kerül sor, ha a file SYS attributumu. 
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Ha sikerrel megnyitottuk a file-t, akkkor a lemez katalógusában levő információk 
átmásolódnak a memóriában levő FCB-be. Ezen túlmenően, ha a file írásvédelemre 
védett volt, s nem adtuk meg a helyes jelszót, az FCB-ben az f7" attributum bitet a 
funkció magasra állítja. Hasonlóan, ha nem 0-ás felhasználói szám alatt nyitottuk meg a 
file-t, de az 0-ás felhasználói, SYS típusú file-nak bizonyult, akkor a rendszer az f8" 
attributum bitet is magasra állítja. Ennek következtében ezekbe a file-okba nem tudunk 
írni. 


Visszatéréskor az A regiszter tartalma OOH, ha nem történt hiba, s OFFH, ha nem sikerült 
a műveletet végrehajtani. Ilyenkor H tartalmazza a hiba igazi okát: 


01 : lemez I/O hiba 

04 : érvénytelen lemezegység megadás 
07 : hibás jelszó 

09 : ? karakter szerepelt a filenévbn 


16-os funkció: file lezárása 

A 16-os funkció egy megnyitott FCB-vel rendelkező file-t lezár. A rutin meghívásakor 
DE-nek a szóbanforgó file FCB-jére kell mutatnia. Az FCB "f5" attributumbitje mutatja, 
hogy hogyan kell a file-t lezárni: 


"15"-1 : részleges lezárás 
"f5/-0 : teljes lezárás 


Teljes lezárás esetén a rendszer valamennyi szükséges információt visszírja a lemez 
katalógusába. (Ha csak írás vagy aktualizálás történt, akkor ez elmarad, hiszen a 
katalógus bejegyzést nem kell megváltoztani.) Teljes lezárás után a file-ba már nem 
tudunk sem írni, sem olvasni. 


A parciális lezárás aktualizálja a katalógust (ha kell), de a file további műveletekre 
nyitva marad. 


Visszatéréskor A-OOH, ha nem történt, s A-OFFH, ha történt valamilyen hiba. Ez utóbbi 
esetben H tartalmazza a hiba okát: 


01 : lemez I/O hiba 
02 : csak olvasható lemez 
04 : érvénytelen lemezegység azonosító 


17-es funkció: katalógusbejegyzés keresése (első) 
A funkció - összhangban nevével - a katalógusban megkeresi egy adott nevű file első 
előfordulását. A file nevében ? karakterek is szerepelhetnek. 


Meghíváskor DE egy FCB-re kell hogy mutasson, amelyik 0. byte-ja a lemezegységet 
adja meg, 1-11. byte-ok pedig a keresendő file nevét. Ezen túl megadhatjuk a 12. byte 
értékét is, akkor a megfelelő sorszámú file-darab után keres a rendszer. Rendszerint a 
12. byte értéke 0. 


Ha a 0. byte helyére írunk be egy kérdőjelet, akkor a funkció a default lemezegység 
első bejegyzésével tér vissza. 


A funkció visszatéréskor az A regiszterben helyezi el a megtalált bejegyzés DMA-n 


belüli sorszámát (0-3). Ha nem találta meg, akkor A értéke OFFH és H tartalmazza a 
hiba okát. 
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Sikeres keresés esetén a DMA puffer A"32-ik pozíciójától találhatjuk meg a megfelelő 
katalógus bejegyzést. 


Ha egy lemezre bevezettük a dátum és idő jelzését, akkor ezeket az információkat 
minden egyes 128-byte-os rekord 4. 32 byte-os része tartalmazza, s csak az első 3 
darab 32 byte-os rész felel meg "igazi katalógus bejegyzésnek. Ebben az esetben a 
DMA puffer 974(A"10) címétől kezdődően 9 byte tartalmazza a következő információkat: 


-3 : a létrehozás dátuma és ideje 
7 : az aktualizálás dátuma és ideje 
: a védelem módja 


18-as funkció: katalógusbejegyzés keresése (következő 
A funkció hívása előtt végre kell hajtani a 17-es funkciót. A jelen hívás segítségével a 
rendszer megkeresi a következő katalógusbeli bejegyzést. A funkció a 17-es funkciónak 
megfelelő paraméterekkel tér vissza. 


19-es funkció: file törlése 

A funkció meghivasakor a DE egy FCB-re kell hogy mutasson. Az FCB-ben megadott 
névspecifikációval . egyező file-okat (pontosabban valamennyi hozzájuk tartozó 
bejegyzést) törli a rendszer. A filenév tartalmazhat ? jelet is, a lemezegység 
azonosítójának azonban egyértelműnek kell lennie. 


Az "15" attributumbit magasra állításával elérhetjük, hogy csak az XFCB bejegyzéseket 
(amelyek a dátum, idő és jelszó adatokat tartalmazzák) törölje a rendszer. 

Ha bármelyik file jelszóval védett, a jelszót a DMA első 8 byte-jára kell helyezni - még 
a funkció meghívása előtt. 


Visszatéréskor A-00H sikeres, A-OFFH sikertelen befejezés esetén. Ez utóbbi esetben H- 
ba helyezi a hiba okát: 


01 : lemez I/O hiba 

02 : csak olvasható lemezegység 
03 : csak olvasható file 

04 : érvénytelen lemezazonosító 
07 : hibás jelszó 


20-as funkció: szekvenciális olvasás 

A szekvencialis olvasási funkció segítségével a file következő 128byte-os rekordjait 
olvashatjuk be a DMA területre. A beolvasott rekordok száma 1-128 lehet s a 44-es 
funkció segítségével lehet beállítani. A 20-as funkció meghívásakor DE egy megnyitott 
file FCB-jére mutat. A funkció - miközben beolvassa az egyes rekordokat - 
automatikusan növeli az FCB-ben a rekordszámot. Ha az túlcsordul, akkor megnöveli a 
"file-terület" sorszámát és a rekordszámot 0-ról újból növelni kezdi. 


Ha a file-t egy 15-ös megnyitási funkció után előlröl akarjuk olvasni, akkor az FCB-ben 
a rekordszámot 0-ra kell beállítani. 


Viszatéréskor a DMA terület a beolvasott 128 byte-os rekordokat tartalmazza, az A 
regiszter pedig a hibakódot. Ha A-00H, akkor nem történt hiba, különben A tartalmazza 
a hiba valódi okát: 


01 : nem létező adatot akartunk olvasni 
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09  : érvénytelen FCB 
10  :a lemezt kicserélték 
255 : fizikai hiba, lásd a H regisztert! 


H lehetséges értékei: 


01 :lemez I/O 
04 : hibás lemezmegadás 


21-es funkció: szekvenciális írás 

A funkció segítségével 1-128 byte-os rekordot tudunk a DMA területről az adott FCB-ú 
file-ba kiírni. A funkció meghívásakor a DE-nek egy megnyitott FCB-re kell mutatnia. A 
kiírandó rekordok számát a 44-es funkcióval lehet beállítani. 


A funkció automatikusan növeli az FCB-ben levő rekordszámot, s ha az túlcsordul, 
akkor automatikusan gondoskodik a file-terület számának növeléséről, s a 
rekordsorszám 0-ra állításáról. 


Ha a file-t az elejétől akarjuk írni, akkor a rekordsorszámot ki kell nulláznunk. 
Visszatéréskor az A regiszter tartalmazza a hiba okát: 


00 :nem történt hiba 

01 : nincs szabad katalógusbejegyzés 
02 : nincs szabad adatterület 

09 : érvénytelen FCB 

10 :a lemezt kicserélték 

255 : fizikai hiba 


Ha az A regiszter fizikai hibát jelez (-255), akkor a H regiszter további információt ad a 
hiba okáról: 


01 :lemez I/O hiba 
02 : csak olvasható lemez 
03 : csak olvasható file 
(vagy a FCB f7"f8 attributum bitjei közül valamelyik magas) 
04 : érvénytelen lemezegység 


22-es funkció: file létrehozása 

A funkció segítségével a lemez katalógusában egy új bejegyzést hozhatunk létre. A 
funkció meghívása előtt DE-be egy FCB mutatóját kell betöltenünk. Az FCB 0-12. byte- 
jait ki kell töltenünk. A filenév "f6" attributum bitje mondja meg, hogy a file-hoz jelszót 
rendelünk-e, vagy sem. Ha ez a bit magas, akkor igen. Ebben az esetben a DMA első 8 
byte-jára kell elhelyeznünk a jelszót s a 9. byte-ot a védelem módjának megfelelően 
kell beállítani. (Ezt a 102-es funkcióval végezhetjük el). 


A file létrehozása nem történik meg, ha hasonló nevű file (ugyanazon felhasználói szám 
alatt) már létezik a lemezen. A funkció után a file megnyitott állapotban lesz, tehát 
írhatjuk, majd olvashatjuk is. 


Ha az "6" attributum bitet magasra állítottuk, s a lemez címkéje a lemezre előírja a 


jelszó védelmet, akkor a funkció még egy XFCB-t is létrehoz, ahová a DMA első 9 
byte-jának megfelelően beírja a (kódolt) jelszót és a védelem módját. 
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Ha a lemezre a dátum és idő jelzése üzemmód is be van kapcsolva, akkor ezek az 
adatok is a lemez katalógusába kerülnek. 


Visszatéréskor A-0OOH a sikeres, A-OFFH a sikertelen befejezést jelzi. Ez utóbbi esetben 
H tartalmazza a hiba okát: 


01 : lemez I/O hiba 

02 : csak olvasható lemez 

04 : nem megfelelő lemezazonosító 
09 :? jel szerepelt a file névben 


23-as funkció: file átnevezése 

A funkció meghívása előtt DE-nek egy FCB-re kell mutatnia. A file új nevét az FCB 
második 16 byte-jának kell tartalmaznia. Ha az átnevezni kívánt file jelszóval védett, 
akkor a jelszót a DMA első 8 byte-jában kell elhelyezni. A funkció a lemez 
katalógusában levő valamennyi - az adott file-ra vonatkozó - hivatkozást átnevezi. 


Visszatéréskor A-OOH a sikeres, A-OFFH a sikertelen befejezést jelenti. Ez utóbbi 
esetben H tartalmazza a hiba okát: 


01 :lemez I/O hiba 

02 : csak olvasható lemez 

03 : csak olvasható file 

04 : hibás lemezegység azonosító 
07 : hibás jelszó 

08 : a file már létezik 

09 :? a névben 


24-es funkció: érvényes lemezegységek lekérdezése 

A funkció visszatéréskor a HL regiszterparban megadja a rendszerben levő 
lemezegységeket. Az L regiszter legalacsonyabb helyiértékű bitje az A, a H regiszter 
legmagasabb helyiértékű bitje a P lemezegységnek felel meg. A megfelelő bit magas 
volta jelzi, hogy az egység a rendszerben van. 


25-ös funkció: aktuális lemezegység lekérdezése 
A funkció A-ban az aktuális lemezegység azonosítójával tér vissza. Ennek megfelelően 
A-ban egy 0-15 közti érték van, ami az A-P egységeknek felel meg. 


26-os funkció: a DMA terület kezdőcímének beállítása 

A funkció meghívásakor DE az új DMA terület kezdőcímét kell hogy tartalmazza. A 
funkció végrehajtását követően a lemez adatátviteli műveletek az így beállított DMA 
területet használják. 


A DMA terület legalább 128 byte. Hossza attól függ, hogy a 44-es funkcióval hány 
rekord egyidejű átvitelét jelöltük ki. Ha ez N volt, akkor a DMA terület hossza 128"N 
byte. 


27-es funkció: lemezegység leíró vektora címének lekérdezése 

A CP/M: minden egyes lemezegységre egy leírót tart nyilván, amelyik a legfontosabb 
lemezműveletek adatait tartalmazza. A 27-es funkció a HL regiszterben az aktuális 
lemezegység leírójára mutató értékkel tér vissza. 


Megjegyezzük, hogy ez a leíró a 0-ás szeleten van, ezért közvetlenül a felhasználói 
programok számára nem elérhető. 
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28-as funkció: lemez írásvédetté tétele 
A funkció az aktuális lemezegységet READ-ONLY állapotba hozza. Ez azt jelenti, hogy a 
lemezegységre - a lemezes rendszer inicializálásáig - nem lehet írni. 


29-es funkció: a csak-olvasható lemezek lekérdezése 

A funkció visszatéréskor a HL regiszterpárban megadja a rendszerben levő csak- 
olvasható lemezegységeket. Az L regiszter legalacsonyabb helyiértékű bitje az A, a H 
regiszter legmagasabb helyiértékű bitje a P lemezegységnek felel meg. A megfelelő bit 
magas volta jelzi, hogy az egység a rendszerben van és csak olvasható. 


30-as funkció: file attributumok beállítása 

A funkció segítségével beállíthatjuk - egy már létező - file attributumait. A funkció 
segítségével az "f1T-f4, a "ti" (csak-olvasható), a "t27 (SYS file) a "t3" (archiv) 
attributumokat állíthatjuk be. 


Lehetőség van az "f6" attributumbit beállítására is, aminek azonban speciális jelentése 
van. Ennek az attributumnak a magasra állításával jelzi a rendszer, hogy a filenév 13. 
byte az utolsó szektorból a file által használt byte-ok számát tartalmazza. Ezt az értéket 
a rendszer nem számítja ki automatikusan, hanem valamennyi alkalmazói programnak 
magának kell beállítania. A file méret kiszámítására azonban a rendszer - ha az f6" 
attributum bitet beállítottuk - használja ezt az értéket. Ha a file névben az "f6-ot 
magasra állítottuk, akkor a 13. byte-ba az utolsó szektor még file-hoz tartozó byte- 
jaink pontos számát kell beírni. 


A funkció meghívásakor DE egy FCB-re mutat, ami a szóban forgó file nevét 
tartalmazza, s az attributum bitek a kívánalmaknak megfelelően be vannak állítva. A 
funkció a katalógus összes - a file névvel megegyező - bejegyzésében átállítja az 
attributum biteket. 


Visszatéréskor A-OOH a sikeres, A-OFFH a sikertelen befejezést jelenti. Ez utóbbi 
esetben a H regiszter tartalmazza a hiba okát: 


01 :lemez I/O hiba 

02 : csak-olvasható lemez 
04 : kiválasztási hiba 

07 : hibás jelszó 

09 :? a filenévben 
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31-es funkció: lemez paraméterblokk címének lekérdezése 


A 31-es funkció a HL regiszterpárban az aktuális lemezegység BIOS-rezidens DPB 
blokkjának, azaz a lemez paraméterblokkjának a kezdőcímével tér vissza. Ez a 0. 
szeleten található, ezért közvetlenül nem lehet megvizsgálni. 


32-es funkció: a felhasználói szám beállítása/lekérdezése 

Az E regiszterbe kell elhelyezni az új felhasználói kódot, vagy OFFH-t, ha lekérdezni 
szeretnénk ezt az értéket. Viszatéréskor az A regiszterben lesz a felhasználói kód 
(feltéve, hogy E-ben OFFH volt). 


33-as funkció: közvetlen olvasás 

A 33-as funkció segitsegevel a file 128byte-os logikai rekordjait olvashatjuk, de 
szemben a szekvenciális olvasással, nem a file-terület és az azon belüli sorszámot kell 
megadnunk, hanem az FCB rO,r1t,r2 byte-jaiban közvetlenül az olvasni kívánt rekord 24 
bites értéket. Ez 0-262143 sorszámú rekordok olvasásának felel meg. A három byte 
közül r0 a legalacsonyabb, r2 pedig a legmagasabb helyiértékű. A maximális rekordszám 
OZ3FFFFH-nak felel meg, ekkor r2 értéke 3. 


A file közvetlen olvasásához a file-t 0-ás file-terület számmal meg kell nyitni. A 33-ás 
funkció meghívása előtt DE a használni kívánt FCB-re mutat, aminek rO,r1 és r2 byte- 
jait már beállítottuk. A funkció meghívása után a rekordok a DMA területre olvasódnak. 


A beolvasott rekordok számát a 44-es funkcióval állíthatjuk be. Ha itt 1-nél nagyobb 
értéket adtunk meg, akkor annak megfelelő számú rekordot olvas be a rendszer. 


Szemben a szekvenciális olvasással a közvetlen rekordszám nem növekszik. Ismételt 
hívása a 33-as funkciónak ugyanazokat a rekordokat olvassa be a memóriába. 


A funkció sikeres végrehajtását az Az00H érték jelzi. Ellenkező esetben A a hiba kódját 
tartalmazza: 


01 : nem létező adatok olvasása 

03 : az adott file-terület nem zárható le 
04 : keresés nem létező file-területre 
06 :a közvetlen rekordszám túlcsordult 
10 :a lemezt kicserélték 

255 : fizikai hiba 


Fizikai hiba esetén H tartalmazza a hiba okát: 


01 :lemez I/O hiba 
04 : érvénytelen lemezazonosító 


34-es funkció: közvetlen írás 

A közvetlen iras hasonló a közvetlen olvasáshoz. A funkció a közvetlen rekordszám által 
megadott rekordot írja a lemezre az adatokat a DMA-ból véve. Amennyiben a rekord 
egy olyan file-területre esik, amelyik még nincs allokálva a file-hoz, akkor ezt elvégzi. 


A funkció hívása előtt a használni kívánt FCB-t a 0-ás file-területtel meg kell nyitni. DE 


a FCB-re mutat. Az FCB rOr1 és r2 byte-jait megfelelően be kel! állítani. Az átvitt 
rekordok számát a 44-es funkcióval állíthatjuk be. 
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Visszatéréskor A tartalmazza a hiba kódját: 


00 : nincs hiba 

02 : nics elérhető adatterület 

03 : az aktuális file-terület nem zárható le 

05 : nincs elérhető katalógus bejegyzés 

06 : a kközvetlen elérésű rekordszám túlcsordult 
10 :a lemezt kicseréltük 

255 : fizikai hiba 


Az A-255 esetben H tartalmazza a fizikai hiba leírását: 


01 : lemez I/O hiba 

02 : csak-olvasható lemez 

03 : csak-olvasható file 

04 : érvénytelen lemezazonosító 


35-ös funkció: file méretének kiszámítása 

A funció meghívása előtt DE-nek egy FCB-re kell mutatnia. Visszatéréskor az FCB rOr1 
és r2 byte-jai a file által még nem használt 128 byte-os rekord sorszámát tartalmazzák. 
Ha pl. r2-4, akkor a file a lehetséges 262144 rekordot tartalmazza. 


Ez az érték félrevezető, mert ha pl. a közvetlen írással a 262143. rekordot irtuk csak fel, 
akkor is 262144-et kapunk, holott a file egyetlen adatot tartalmaz csak. 


Visszatéréskor A-0OOH, ha a file-t megtalálta a rendszer, s A-OFFH, ha nem. Mindkét 
esetben H értéke 0. Ha fizikai hiba történt, akkor H 0-tól különböző értéket tartalmaz: 


01 : lemez I/O hiba 
04 : érvénytelen lemezegység azonosító 


36-os funkció: közvetlen rekordszám beállítása 

h" VRZEY SAE MEET TE NEVETETT TAB 7 EZEK TETTRE; V TEL ÉNEKESEKET penge ezzezegr , $.e , 1 [4 nm a. 5 A pig 

A funkció az FCB file-terület es rekordsorszam byte-jainak értékeből kiszámítja a 
következő rekord sorszámát, s ezt az FCB közvetlen rekordszámába írja. 


Erre főleg olyankor lehet szükség, ha egy adott pontig szekvenciálisan írtuk vagy 
olvastuk a file-t, s azután áttérünk a közvetlen írásra, olvasásra. 


A funkció DE-ben az FCB mutatóját várja. 


37-es funkció: lemezegység inicializálása 

A funkció segitségével adott lemezegységeket inicializálhatunk. Ennek hatására az 
egység írható-olvasható lesz, s nem lesz beléptetett lemez az egységben. A funkció a 
DE-ben várja az inicializálni kívánt egységeket. Az E legkisebb helyiértékű bitje az A, a 
D legnagyobb helyiértékű bitje a P egységnek felel meg. A megfelelő bit magasra 
állítása jelzi, hogy az egységet inicializálni kell. 


38-as funkció: lemez lefoglalása 


Ez MP/M funkció, a CP/Mt-ban nincs megvalósítva. Ha mégis meghívjuk, az A értéke 
004H lesz, jelezve, hogy a funkció sikerrel lefutott. 


39-es funkció: lemez felszabadítása 
Ez MP/M funkcio, a CP/Mt-ban nincs megvalósítva. Ha mégis meghívjuk, az A értéke 
00H lesz, jelezve, hogy a funkció sikerrel lefutott. 
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40-es funkció: közvetlen írás allokálással 
A 40-es funkció használata teljes mértékben azonos a közvetlen írás funkcióval (34-es 
funkció). Egyetlen különbség, hogy a funkció az esetleg még nem létező rekordokat is 
létrehozza, s azokat 00H byte-tal tölti fel. 


41-es funkció: rekord ellenőrzése és írása 
Ez MP/M II funkció, a CP/Mtr-ban nincs megvalósítva. Ha mégis meghívjuk az A értéke 
OFFH, a H értéke 0 lesz. 


42-es funkció: rekord zárolása 
Ez MP/M II funkció, a CP/Mt4-ban nincs megvalósítva. Ha mégis meghívjuk az A értéke 
00H lesz, jelezve, hogy a funkció sikerrel lefutott. 


43-as funkció: rekord felszabadítása 
Ez MP/M II funkció, a CP/Mt-ban nincs megvalósítva. Ha mégis meghívjuk az A értéke 
00H lesz, jelezve, hogy a funkció sikerrel lefutott. 


44-es funkció: többszektoros adatátvitel beállítása 

A FERJET VET 6 ZETT A) TOT JOE EE TO ET GEERS LON TE TESZTÜSZEE ESET IETTEZOES 7. ages , , Fé .. 4 
A funkcio E-ben az egyszerre atviendo szektorok szamat varja. Ezt követően 
valamennyi írási/olvasási művelet egyszerre ennyi 128byte-os rekordot mozgat. 


E értékének az 1-128 intervallumba kell esnie. Ha nem, akkor visszatéréskor A-OFFH 
lesz. 


A CCP az egyszerre átviendő szektorok számát 1-re állítja be. 


45-ös funkció: BDOS hibamód beállítása 
A funkció meghivása előtt E-ben a kivant hibamód kódját kell beállítani. Ezek a kódok a 
következők: 


OFFH : visszatérési üzemmód 
OFEH : kijelzési és visszatérési üzemmód 
egyéb : kijelzési üzemmód (default) 


A BDOS indításkor kijelzési üzemmódban dolgozik. Ez azt jelenti, hogy hiba esetén a 
CONOUT: periférián a hiba okára utaló üzenet jelenik meg, s a hívó program futása 
megszakad. 


Visszatérési üzemmódban a BDOS nem küld hibaüzenetet, s visszatér a hívó programba 
(A és H értékét megfelelően beállítva). 


Kijelzési és visszatérési üzemmódban a képernyőn kapunk üzenetet, de a BDOS 
visszatér a hívó programhoz. 


46-os funkció: szabad lemezkapacitás lekérdezése 


A funkció a lemez szabad kapacitasat adja meg 128byte-os rekordokban mérve. A 
funkció meghívásakor E tartalmazza a lemezegység kódját (0-A,1-B,... 15-P). 


Visszatéréskor A DMA első 3 byte-ja egy hárombyte-os bináris számot ad, ez a szabad 
rekordok száma. Az első byte a legalacsonyabb, a harmadik a legmagasabb helyiértékű 
byte. 

Sikeres végrehajtás esetén A-OOH, egyébként A-OFFH. Ez utóbbi esetben H tartalmazza 
a hiba kódját: 
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01 : lemez I/O hiba 
04 : érvénytelen lemezazonosító 


47-es funkció: program töltése 


A funkció a DMA terület elején - 00OH byte-tal lezárva - egy CP/Mt parancsot vár, amit 
a CCP végre is hajt. Ha az E regiszter értéke OFFH, akkor a CCP az aktuális 
lemezegységet és a felhasználói számot a 47-es funkciót hívó programból veszi át. Ha 
nem, akkor a saját default értekeit használja. 


A betöltött programnak a 108-as funkcióval egy kétbyte-os értéket adhatunk át. 
A funkció értelemszerűen befejezi a program futását, ezért a keletkező hibákat a CCP 
kezeli le. 


48-as funkció: pufferek kiürítése 

A funkció hatására a rendszer az összes puffer tartalmát kiírja a lemezre. Ha pl. 
ellenőrizni akarjuk, hogy a lemezre azt írtuk-e, amit akartunk, akkor ezt a parancsot 
mindig ki kell adnunk. 


A sikeres végrehajtást az A-00H érték jelzi. Ellenkező esetben A-OFFH és H tartalmazza 
a hiba okát: 


01 :lemez I/O 
02 : csak-olvasható lemez 
04 : érvénytelen lemezegységazonosító 


49-es funkció: SCB lekérdezése/beállítása 

A funkció segitségével a SCB byte vagy szó értékeit módosíthatjuk, illetve 
lekérdezhetjük. A funkció meghívásakor a DE egy SCB paraméter blokkra mutat, 
melynek felépítése a következő: 


SCPPB: 
DB ELTOLAS ; az SCB-n belüli kezdő pozíció 
DB MOD ; OFFH - byte beállítása 


; OFEH -— szó beállítása 
; OOH - byte lekérdezése 
W ERTEK ; a beállítandó érték (ha beállítás) 


A funkció működése a paraméter blokk második byte-jától függ. Ha beállításró! van szó, 
akkor a SCB megfelelő byte-jába, vagy szavába bemásolja a paraméterblokkban 
megadott értéket. Ha lekérdezésről van szó, akkor a megfelelő byte az A regiszterbe 
kerül, míg az azon a helyen levő szó a HL regiszterpárba. 


50-es funkció: BIOS hívás 
A funkció hivásakor DE egy BIOS paraméterblokkra kell, hogy mutasson. A BIOS 
paraméterblokk felépítése a következő: 


BIOSPB: 
DB FUNC ; BIOS funkció száma 
DB AREG ; az A regiszter tartalma 
DW BCREG ; a BC regiszterpár tartalma 
DW DEREG ; a DE regiszterpár tartalma 
DW HLREG ; a HL regiszterpár tartalma 
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A funkció az A, BC, DE illetve HL regiszterek értékét beállítja, s meghívja a megfelelő 
BIOS funkciót. 


59-es funkció: átlapolt program töltése 

A funkció a DE-ben megadott FCB-nek megfelelő file-t betölti a memóriába. A program 
abszolút vagy relokálható lehet. Ez utóbbit a PRL típusáról ismeri fel a rendszer. A hívó 
programnak legalább egy RSX rezidens bővítést kell tartalmaznia, különban a LOADER 
modul nincs a memóriában. 


Az FCB-t a funkció meghívása előtt meg kell nyitni. A töltési cím a közvetlen 
rekordszám első két, r0 és r1 byte-ja. A LDOADER modul hibajelzést ad, ha a töltési cím 
kisebb, mint 0100H, vagy felülírná önmagát. 


Visszatéréskor A és H tartalmazza a hiba okát: 


A H 
OFFH 0O0H: nincs meg a LDOADER modul 
OFEH 00H: töltési cím C0100H, 
vagy a LOADER felülírná önmagát 
OFFH xxH: ugyanaz, mint a 20-as, szekvenciális olvasás 
funkció esetén 


60-as funkció: RSX bővítés hívása 
A funkció meghívása előtt DE egy RSX paraméterblokkra kell hogy mutasson. Az RSX 
paraméterblokk felépítése a következő: 


RSXPB: 
DB FUNC : funkció szám 
DB DARAB : a szó paraméterek száma 
DW PARAM1 : első paraméter 
DW PARAMn : utolsó paraméter 


A funkcióhívás végigfut a teljes RSX bővítési láncon. Ha egyáltalán nincs RSX bővítés, 
akkor A és L értéke OFFH lesz. 


A 0-127 függvényhívások a BDOS számára fenntartottak. A felhasználói szoftverek a 
128-255 hívásokat használhatják. 


98-as funkció: ideiglenesen allokált blokkok felszabadítása 

A funkció az összes beléptetett lemezen felszabadítja az ideiglenesen allokált blokkokat. 
Ezek azok a blokkok, amelyek valamelyik file-hoz tartoznak, de ez a tény még a 
katalógusban nincs rögzítve. 


A funkció sikeres végrehajtásakor A-OOH, különben A-OFFH. Ilyenkor H-O4H, jelezve, 
hogy lemez I/O hiba történt. 


99-es funkció: file csonkolása 
A funkció meghívásakor DE egy FCB-re mutat. A funkció a közvetlen rekordszámnál 
levágja a file-t, az annál nagyobb sorszámú rekordok helyét felszabadítja. 


Ha a file jelszóval védett, akkor a DMA első 8 byte-ján a jelszót is meg kell adnunk a 
funkció hívása előtt. 
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A funkció meghívásakor az adott file nem lehet nyitott. 
Sikeres végrehajtás esetén A-OOH, ellenkező esetben A-OFFH, s a H regiszter 
tartalmazza a hiba okát: 


01 : lemez I/O hiba 

02 : csak-olvasható lemez 

03 : csak-olvasható file 

04 : érvénytelen lemezegység azonosító 
07 : hibás jelszó 

09 :? a filenévben 


100-as funkció: lemez címkéjének megadása 

A funkció segítségével adhatjuk meg a lemez címkéjét. A funkció meghívása előtt a DE 
egy FCB-re kell hogy mutasson. Ez tartalmazza a lemez címkéjének nevét, a 
lemezegység azonosítóját. Az FCB 12. byte-ja a további paramétereket adja meg. Ezek a 
12. byte megfelelő bitjeinek magasra állításával aktivizálhatók: 


: védelem bekapcsolása 

: olvasási művelet esetén dátum és idő beállítása 
: módosítás esetén dátum és idő beállítása 

: létrehozás esetén dátum és idő beállítása 

: új jelszó adása a címkéhez 


BÖVEN 


Ha a lemez címkéje jelszóval védett, a jelszót a DMA első nyolc byte-jára kell 
elhelyezni. Ha az FCB 12. byte-jának 0. bitjét magasra állítottuk, akkor a DMA második 8 
byte-jára kell az új jelszót beírni. 


Visszatéréskor az A-OOH érték jelzi, hogy a funkció sikeresen befejeződött. Ha nincs 
hely a címke felírására, vagy az idő és dátum felírást követeljük, de a lemez nem 
tartalmaz SFCB-ket, akkor A-OFFH lesz, miközben H-OOH. Ha fizikai hiba történt, akkor 
A-OFFH ugyancsak, de H egy nem nulla értéket tartalmaz: 


01 :lemez I/O hiba 

02 : csak-olvasható lemez 

04 : érvénytelen lemezegység azonosító 
07 : hibás jelszó 


101-es funkció: lemez cimbyte-jának lekérdezése 
1981-es Tunkció: lemez címbyte-janak lekerdez 


A funkció segítségével a 100-as funkciónál az FCB 12. byte-jaként megadott cimbyte- 
ot lehet lekérdezni. A funkció meghívásakor E-be a lemez azonosítóját (A-0,B-1,... P-15) 
kell megadni. Visszatéréskor A-ba kerül a szóbanforgó byte, amelynek egyes bitjei (ha 
magasak) az alábbiakat jelentik: 


: jelszóvédelem bekapcsolva 

: olvasás esetén dátum és idő jelzés 

: módosítás esetén dátum és idő jelzés 
: létrehozás esetén dátum és idő jelzés 
: a lemezen van címke 


so et eze 


Sikeres végrehajtás esetén A-00H, különben A-OFFH és a H regiszter tartalmazza a hiba 
kódját: 


01 : lemez I/O hiba 
04 : érvénytelen lemezegység azonosító 
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102-es funkció: a file dátum és idő adatainak olvasása 
A funkció meghívásakor DE egy FCB-re mutat. A funkció az FCB 12. és 24-32. byte-jait 
tölti fel információval. A 12. byte magasra állított bitjeinek a jelentése a következő: 


7. : olvasás ellen védelem 
6. : írás ellen védelem 
4. : törlés ellen védelem 


Ha a 12. byte -004H, akkor a file egyáltalán nem védett. 


A 24-27., illetve a 28-31. byte-ok a kreálás vagy elérés, illetve a módosítás utolsó 
idejét (-z dátum és idő) mutatják. ennek alakját a 104-es funkciónál írjuk le. 


Sikeres végrehajtás esetén A-00H. Ha a file-t nem találta a rendszer, akkor A-FFH, de 
H-00H. Ha fizikai hiba történt, akkor H 00H-tól eltérő értéket tartalmaz: 


01 :lemez I/O 
04 : érvénytelen lemezazonosító 
09 :? a filenévben 


103-as funkció: file XFCB írása 

A funkció segítségével XFCB-t írhatunk a lemezre, ami a file védelmi módját, jelszavát 
tartalmazza. A DE-nek a szóban forgó file FCB-jére kell mutatnia. A 12. byte magasra 
állított bitjei határozzák meg a védelem módját: 


7. : olvasási védelem 

6. : írásvédelem 

5. : törlés elleni védelem 
0. : új jelszó megadása 


Ha a file jelszó védett volt, a jelszót a DMA első nyolc byteján kell elhelyezni. Ha a 0. 
bitet magasra állítottuk, akkor az új jelszót a DMA terület második 8 byte-ján kell 
elhelyezni. 


Ha a funkció sikerrel befejeződött, akkor az A regiszter értéke visszatéréskor OH. Ha a 
lemezen nincs címke, az FCB-t nem találta meg a funkció, nem volt elég hely az XFCB 
beírásához, vagy a címkében nem volt bekapcsolva a védelem, akkor A-OFFH és H-00H. 
Ha fizikai hiba történt, akkor H értéke a következő: 


01 : lemez I/O hiba 

02 : csak-olvasható lemez 

04 : érvénytelen lemezegység azonosító 
07 : hibás jelszó 

09 :? a filenévben 


104-es funkció: dátum és idő beállítása 

EKET TET EE T§ E HEGY ÍTOTT ENÜÜPFOZÉN TT VE STT szep s SE 1 ERNI ) .. 

A funkció beallítja a CP/Mt belső Orájáat. DE az adatokat leíró területre mutat. Ez 
összesen 4 byte-ot tartalmaz, amelyek jelentése az alábbi: 


0-1. byte : dátum 
2. byte: óra 
3. byte : perc 
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A dátum 16 bites egész számnak tekintendő, s az 1978 január 1-je óta eltelt napokat 
jelenti. 


A funkció a másodperceket nullázza. 


105-ös funkció: dátum és idő lekérdezése 

A funkció lekérdezi a CP/Mt belső óraját. DE az adatokat leíró területre mutat. Ez 
összesen 4 byte-ot tartalmaz, amelyek értékét a funkció beállítja. Ez egyes byte-ok 
jelentése az alábbi: 


0-1. byte : dátum 
2. byte : óra 
3. byte : perc 


A dátum 16 bites egész számnak tekintendő, s az 1978 január 1-je óta eltelt napokat 
jelenti. 


A funkció a másodperceket az A regiszterben adja vissza. 


106-os funkció: általános jelszó megadása 


A funkcióval lehetőség nyilik altalanos jelszó megadására. Jelszóval védett file-ok 
esetén a rendszer a DMA első 8 byte-ját és az általános jelszót vizsgálja meg. Ha ezek 
bármelyike azonos a file XFCB-ban levő jelszavával, a file-t használhatjuk. 
A funkció meghívásakor a DE a jelszó első byte-jára kell hogy mutasson. 


107-es funkció: sorozatszám lekérdezése 
A funkció meghivásakor a DE-nek egy 6 byte-os munkaterületre kell mutatnia, ahová a 
funkció beírja a CPMt sorozatszámát. 


108-as funkció: program visszatérési kód lekérdezése/beállítása 
A CP/Mt megengedi, hogy minden egyes program - mielőtt megáll - egy kétbyte-os 


visszatérési kódot adjon át a rendszernek, amit azután a többi program lekérdezhet. 

A funkció működése a DE tartalmától függ. Ha DE-OFFFFH, akkor az lekérdezésnek 
számít, s a funkció HL-ben az utoljára kapott visszatérési kódot adja vissza. Ha DE 
értéke ettől eltér, akkor DE értéke lesz a visszatérési kód. 

Az egyes értékek jelentése az alábbi: 


0000-FEFF sikeres befejezés 
FFOO-FFFE sikertelen befejezés 


0000 a CCP ezt az értéket állítja be 

FF80-FFFC fenntartott 

FFFD a program BDOS hiba miatt állt meg 

FFFE a program CTRL-C megnyomása miatt állt meg 


109-es funkció: konzol mód lekérdezése./beállítása 

A funkció segitsegevel lekerdezhetjük, illetve beállíthatjuk a konzol módot. Ha 
DE-OFFFFH a funkció meghívásakor, akkor az lekérdezésnek számít, s HL-ben kapjuk 
vissza a konzol mód kódját. i B 

Ha DE ettől eltérő értéket tartalmaz, az beállításnak számít. A DE egyes bitjeinek a 
jelentése ekkor a következő: 
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0. bit : -1 CTRL-C-t jelzi csak a 11-es funkció 
-0 a 11-es funkció normálisan működik 
1. bit : -1 letiltja a CTRL-S, CTRL-O használatát 
-0 megengedi a CTRL-S, CTRL-O használatát 
2. bit: -1 TAB bővítést letiltja, CTRL-P-t és a nyomtatóra írást úgyszintén 
7-0 normál üzemmód 
3. bit : 71 letiltja a CTRL-C-vel való megállítást 
7-0 megengedi a CTRL-C-vel való megállítást 
8-9. bit: RSX-k kezelése. Ezek a bitek mondják meg, hogy válaszoljanak az 


RSX bővítések a konzoligényekre: 
- 0 0 feltételes mód 

- 0 1 hamis állapot 

10 igaz állapot 

- 1 1 átirányítás 


[1 


A CCP a konzol módot 0-ra állítja be. 


110-es funkció: elválasztójel lekérdezése/beállítása 
) dezese/beallitasa 


A 9-es funkció a karakterek nyomtatását a 110-es funkcióval beállított elválasztójelig 
végzi. Ezt az értéket a CCP a $ jelre állítja be, de ennek a funkciónak a használatával 
lehetőség van ennek módosítására. 


Ha DE-OFFFFH, akkor az lekérdezésnek számít, s az A-ban kapjuk vissza az érvényes 
elválasztó jelet. 


Ha DE értéke ettől eltér, akkor az E regiszterben levő karakter lesz az aktuális elválasztó 
jel. 


111-es funkció: blokk nyomtatása 
A funkció meghivasa előtt DE-nek egy karakter kontrol blokkra kell mutatnia. A karakter 
kontrol blokk felépítése a következő: 
CCB: 
DW CIM ; az első kiírandó karakter címe 
DW HOSSZ ; a kiírandó karakterek száma 


A funkció a CCB-ben megadott karaktereket kiírja a CONOUT: perifériára. 
112-es funkció: blokk listázása 
A funkcio meghivasa elott DE-nek egy karakter kontrol blokkra kell mutatnia. A karakter 
kontrol blokk felépítése a következő: 
CCB: 
DW CIM ; az első kiírandó karakter címe 
DW HOSSZ ; a kiírandó karakterek száma 


A funkció a CCB-ben megadott karaktereket kiírja a LST: perifériára. 
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11.5 A HELP és a KEYFIG programok 


A Commodore 128-hoz adott CP/Mt rendszerlemez további két programot tartalmaz, 
amelyik gyakran hasznos lehet. 


HELP 


A HELP használatához a használt lemezen két file-nak is kell lennie: az egyik a 
HELP.COM, a másik a HELP.HLP file. A CP/M-r használatára vonatkozó információkat 
valójában a HELP.HLP file tartalmazza. 


Szintaxis: 
HELP (téma) (í(résztéma1 ... résztéma8) ( INOPAGEJUSTI 3) 


HELP [EXTRACTJ] 
HELP [CREATEI] 


A HELP első formájában a segítő információkat olvashatjuk. A megfelelő téma 
képernyőn történő megjelenítése után az utolsó sorban 


HELP 


üzenet jelenik meg a képernyőn. Lehetőségünk van újabb téma és résztémaválasztással 
más témákról információt kapni. Ha a beírás elé tizedespontot (.) teszünk, akkor azt úgy 
értelmezi a program, hogy a jelenlegi témák résztémáit adtuk meg, s onnan keresi az 
általunk beírt résztémákat. 


Ha például a HELP ED parancs kiadása után a .COMMANDS-t válaszoljuk, akkor az 
ekvivalens a HELP ED COMMANDS kiadásával. 


Ha az előbbire csak COMMANDS-szal válaszolunk (tizedespont nélkül), akkor 
hibaüzenetet kapunk, mert ilyen (a legfelsőbb szinten levő) téma nincs. 


A HELP másik két alakja saját segítő képernyők elkészítésére szolgál. 

EXTRACT Az opció segítségével a HELP.HLP file-ból előállíthatunk egy HELP.DAT nevű 
file-t, amelyik a segítő képernyők szövegeit tartalmazza. Ezt a file-t bármelyik 
CP/Mt- alatt üzemelő szövegszerkesztővel módosíthatjuk. 

A szöveg szerkesztésénél arra kell ügyelnünk, hogy a résztémákat mindig egy 
///ngrésztéma: 

karaktersorozatnak kell bevezetnie. A három darab / jelről ismeri fel a HELP, hogy 
hol kezdődnek résztémák. n-nek 1 és 9 közé kell esnie, s a résztéma szintjét 
határozza meg. 

A résztémák megírásánál ezen túlmenően még tekintettel kell lenni arra, hogy 


azokat ABC sorrendben, s mindig a közvetlen felettük levő téma után kell a 
szövegfile-ba behelyeznünk. 
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CREATE Az opció a HELP.DAT file-ból előállít egy új HELP.HLP file-t. Ezután a HELP 
egyszerű használata már az új segítő képernyőket adja. 


KEYFIG 


A KEYFIG program lehetőséget ad arra, hogy a billentyűzet használatát módosítsuk. 
Lehetőség nyílik a billentyűzethez más ASCII kódok hozzárendelésére, illetve bizonyos 
ASCII kódú billentyűk esetén azokhoz karaktersorozatot rendelhetünk hozzá. A Turbo 
Pascal-ról szóló részben ajánlunk egy billentyűzet kiosztást a program használatához. 


A KEYFIG segítségével módosíthatjuk a logikai-fizikai színmegfeleltetést is. Erre főleg 
olyenkor van szükség, ha a monitorunk minősége nem megfelelő, s valamely program 
színkiosztása gondot okoz. 


A KEYFIG segítségével a billentyűzet és a színek új definícióit visszaírhatjuk a lemezre a 


CPM.SYS file-ba. Ennek hatására a következő rendszertöltéskor automatikusan az új 
definíciók lépnek életbe. 
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12. fejezet 
BIOS funkcióhívások 


12.1 BIOS funkcíóhívások felhasználása 


A CP/M rendszerek előnye éppen az, hogy pontosan meghatározzák a rendszernek a 
hardverfüggő részét, s hogy azzal a rendszer többi része hogyan kell hogy kommuni- 
káljon. Ez a BIOS, ami teljes egészében gépfüggő. Tartalmaznia kell valamennyi hardver 
függő funkciót ahhoz, hogy a CP/M többi része kommunikálni tudjon vele. Szerencsére 
a géppel együtt szállított CP/Mt rendszerlemez már készen tartalmazza ezeket a része- 
ket, s nem a felhasználónak kell ezeket megírnia. A BIOS az I/O funkciók egy részét úgy 
hajtja végre, hogy bizonyos paraméterek beállítása után kikapcsolja a 280-as procesz- 
szort és visszakapcsolja a 8502-es processzort. Az elvégzi a szükséges feladatot, majd 
visszaadja a vezérlést a 280-asnak. A programnak ezt a részét 8502BIOS-nak hívjuk, u- 
talva arra, hogy a rendszerfunkciókat egy másik processzor végzi el. 


A BIOS 33 vektorból álló ugrótáblát tartalmaz (hasonlóan mint a KERNAL). Ezek segítsé- 
gével lehet az egyes funkciókat végrehajtani. 


A BIOS funkciói sorrendben a következők: 


Sorszam  Utasitas BIOS Belepesi Jelentes 
táblázat pont 


0 JP BOOT F400 CAOO hidegindítás 

1 JP WBOOT F403 F46C melegindítás 

2 JP CONST F406 F56F konzol állapotának leolvasása 
3 JP CONIN F409 F588 konzolról karakter beolvasása 
4 JP CONOUT F40C F40A konzolra karakter kiírása 

5 JP LIST F40F F4E6 LST:-re karakter kiírása 

6 JP AUXOUT F412 F4E0 AUX:-ra karakter kiírása 

7 JP AUXIN F415 F58BD AUX:-ről karakter beolvasása 
8 JP HOME F418 CAGA A lemezegység a 0. sávra áll 
9 


JP SELDSK F41B CA3ZC  lemezegység kiválasztása 

10 JP SETTRK F41E CA6GD sáv számának beállítása 

11 JP SETSEC F421 CA73 szektor számának beállítása 

12 JP SETDMA F424 CA79 a DMA kezdőcímének beállítása 


13 JP READ F427 CA9gO az adott blokk beolvasása 
14 JP WRITE F42A CAA5 az adott blokk kiírása 
15 JP LISTST F42D F50D az LST: állapotának lekérdezése 


16 JP SECTRN F430 CAB5 szektor fizikai számának kiszámítása 

17 JP CONOST  F433 F503 a konzol írási állapotának lekérdezése 

18 JP AUXIST F436 F574 az AUX: olvasási állapotának lekérdezése 
19 JP AUXOST F439 F508 az AUX: írási állapotának lekérdezése 

20 JP DEVTBL F43C F4D2 karakteres I/O eszközök leírás (kezdőcím) 
21 JP DEVINI F43F F737 inicializálja a karakteres I/O eszközöket 
22 JP DRVTBL F442 F4D6 — a lemezegységek leírása (kezdőcím) 

23 JP MULTIO F445 CAC6 logikailag összefüggő blokkok száma 


24 JP FLUSH F448 CACA a puffer fizikai írása/olvasása 
25 JP MOVE F44B F8AO memóriatranszfer 
26 JP TIME F44E F82E az idő olvasása/írása 
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27 JP SELMEM F451 F60OF a memória szelet kiválasztása 

28 JP SETBNK F454 CAB1I szelet megadása DMA-hoz 

29 JP XMOVE F457 F8AB szeletek közti MOVE előkészítése 

30 JP USERF F45A — F65B — Commodore CP/Mt felhasználói funkció 
31 JP RESERV1 F45D — 0000 fejlesztés alatt 

32 JP RESERV2 — F460 0000 fejlesztés alatt 


Az ugrótábla elhelyezkedését onnan lehet megállapítani, hogy a 00004H-OOOZ2H címeken 
levő utasítás a tábla 2. helyére mutat. A CP/M szabvány szerint az ugrótábla csak 
laphatáron kezdődhet (a cím alsó byte-ja 0), ezért a WBOOT alsó byte-ja mindig három. 
A felső byte-ja pedig az ugrótábla kezdőcíme. 


Az ugrótábla a C-128 esetén a közös rendszermemóriában helyezkedik el, ezért mind a 
0., mind az 1. szeletből hívhatók. Vannak azonban olyan rutinok is a táblázatban, 
amelyek további részei már a 0. szeleten találhatóak. Ezért ezek meghívása előtt át kell 
kapcsolni a 0. szeletre. (Az összes Cxxx belépési pontú rutin ilyen!) 


A fenti táblázatból két dolog rögtön kitűnik: a CP/M - szemben a C-128-as móddal - 
különbséget tesz karakteres és blokkos I/O eszközök között. (Lásd a 20. és a 22. rutint.) 
Ez utóbbiak esetében pedig közvetlenül a memóriában olvassa be a blokkot. A másik, 
hogy a BIOS ugrótábla egy sor olyan funkciót tartalmaz, amire a memória speciális 
használata miatt van szükség. Ezek a funkciók egyébként a C-128 KERNAL-ban is meg- 
találhatók. 


Két egyszerű példát adunk a BIOS használatára. Mind a kettőt ki is próbálhatjuk, ha egy 
CP/M alatt futó gépi kódú monitorral rendelkezünk. 


Képernyő törlése 


4000 Id c,1b ; ESC betöltése c-be, majd 
call — f4áda ; — kiírása 
Id c3a ; : kódjának betöltése c-be, majd 
call f4da ; kiírása 
ret ; visszatérés a monitorhoz 


A rutin az ESC : karaktersorozatot küldi el a konzolra, aminek hatására az törlődik. A 
c4000 monitor parancs ezek után tehát törölni fogja a képernyőt. 


A második példa a O.lap elérését mutatja be a SELMEM használatával. Ehhez a gépi 
kódú rutinnak a közös memória részben kell lennie. Legkézenfekvőbb a lemezműveletek 
puffer területét használni. Ez 256 byte az FEOOH cimtől kezdődően. 


Képernyő POKE 

Az alábbi rutin a 40 oszlopos képernyőhöz tartozó 80 oszlopos logikai képernyő első 
byte-jába írja az u betű képernyő kódját (-15H). Ennek hatására a képernyő bal felső 
sarkában megjelenik az u betű. Maga a program: 


fe00 Id a,0 ; a 0.szelet kijelölése 
call f6Of ; és bekapcsolása (SELMEM) 
Id a, 15 ; a-ban az u kódja 
Id (1400),a ; beírása a 80 oszlopos logikai képernyőre 
Id a,1 ; az 1.szelet kijelölése 
call f6Of ; és bekapcsolása (SELMEM) 
ret 
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Abban az esetben, ha olyan programokat szeretnénk készíteni, amelyek bármely CP/M 
V3.04 rendszerben üzemelnek, a fenti hívások nem megfelelők. A CP/M rendszer csak 
azt köti ki, hogy a 0000 címen egy JMP WBOOT utasítás található. Ebből kell kiszámítani 
a táblázat többi rutinjának helyét. Például a képernyő törlő rutint az alábbi formában 
kell használni: 


4000 Id c, 1b ; ESC a c regiszterben 
call 4010 ; c kiírása a konzolra 
ld c 3a ,; : a c regiszterben 
call 4010 ; c kiírása a, konzolra 
ret ; alprogram vége 
4010 push hi ; hI elmentése 
ld hI,(0001)  ; hI-ben a WBOOT címe 
ld I,0c ; hI-ben a 4. BIOS címe (0c-3"4) 
ex (sp),hi ; hl régi értéke vissza és a 4.BIOS rutin 
ret ; címe a veremben. ret-tel vezérlésátadás a 4.BIOS rutinra 


A 4010 alatti alprogram a BIOS tábla kezdőcímét veszi a JP WBOOT 0000 alatti utasí- 
tásból s az alsó (H) byte-ját átírja. Ezt a címet berakja a verembe s egy ret-tel erre a 
címre adja a vezérlést. 


A BIOS címek ismerete nélkül is kínál a CP/M a BIOS funkciók hívására egy általános 
eljárást. Ehhez a BDOS 50. funkcióját kell használnunk. Ebben az esetben a hívás 
általános alakja a következő: 


Id bc,50 

Id de parameter 

call 5 
parameter: 

db alfunkció 

db Areg 

dw BCreg 

dw DEreg 

dw HLreg 


Szavakkal: BC-ben kell megadni a BDOS 50. funkciójának sorszámát, DE-be pedig a 
BIOS funkció paramétereinek leírására mutató vektort kell tölteni. A paraméter tábla 2 
byte-ot és 3 szót tartalmaz. Ezek értéke sorban: 


a BIOS funkció száma 

- az A regiszter tartalma 
- a BC regiszter tartalma 
a DE regiszter tartalma 
- a HL regiszter tartalma 


Megjegyezzük, hogy ezzel a módszerrel valamennyi BIOS funkcióhívás elvégezhető. 
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12.2 BIOS funkcióhívások 


A továbbiakban röviden összefoglaljuk a fenti BIOS rutinoknak a használatát: 


0. BIOS rutin: BOOT 
A rutin az összes hardver eszköz inicializálást elvégzi, beállítja a 0-ás lap változóit, 
betölti és elindítja a CCP-t. Csak a 0-ás szeletről hívható! 


1. BIOS rutin: WBOOT 
Beállítja a 0-ás lap változóit és újratölti a CCP-t. 


2. BIOS rutin: CONST 
Lekérdezi a konzol állapotát. Ha a konzolról érkezett karakter, akkor A-OFFH lesz, 
különben 00H. 


3. BIOS rutin: CONIN 
Beolvas egy karaktert a rendszerhez tartozó konzolokról. A rutin addig próbálkozik, mig 
nem sikerül egy karaktert beolvasnia. A karakter értéke az A regiszterbe ???aa. 


4. BIOS rutin: CONOUT 
A C regiszterben levő karaktert valamennyi konzolra elküldi. Addig vár, míg valamennyi, 
a rendszerben levő konzol jelzi a karakter feldolgozását. 


5. BIOS rutin: LIST 
A C regiszterben levő karaktert valamennyi LST: perifériára elküldi. Egészen addig vár, 
míg valamennyi a rendszerben levő listázó eszköz jelzi a karakter feldolgozását. 


6. BIOS rutin: AUXOUT 
A C regiszterben levő karaktert valamennyi AUX: perifériára elküldi. Egészen addig vár, 
míg valamennyi, a rendszerben levő AUX: eszköz jelzi a karakter feldolgozását. 


7. BIOS rutin: AUXIN 

Beolvas egy karaktert a rendszerhez tartozó valamelyik AUX: perifériáról. A rutin addig 
próbálkozik, mig nem sikerül egy karaktert beolvasnia. A karakter értéke az A 
regiszterbe kerül. 


8. BIOS rutin: HOME 
A kiválasztott lemezegység író/olvasó fejét az ún. home" pozícióba mozgatja. Ez a 
lemez 0. sávjára történő pozícionálást jelenti. Csak a 0-ás szeletről hívható. 


9. BIOS rutin: SELDSK 

Az utasítás hatására a C regiszter által kijelölt egység lesz az aktuális lemezegység. Ha 
az E regiszter alsó 4 bitje 0, akkor a rendszer úgy tekinti, hogy a szóban forgó lemezt 
először használjuk és beolvassa a lemez DPB-jét (disk paraméter blokk). HL a DPB 
kezdőcímét tartalmazza. Ha ez OOH, akkor a lemezegység nem található a rendszerben. 
Csak a 0-ás szeletről hívható! 


10. BIOS rutin: SETTRK 


A BC regiszterpár kijelöli a következő lemezművelet, sávját (track-jét). Csak a 0-ás 
szeletről használható! 
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11. BIOS rutin: SETSEC ; 
A BC regiszterpár jelöli ki a következő lemezművelet szektorszámát. Ennek az értéknek 
a logikaicfizikai konvertálás utáni értéknek kell lennie! Csak a 0-ás szeletről 
használható. 


12. BIOS rutin: SETDMA 
Beállítja a legközelebbi lemezművelet pufferének kezdőcímét. A rendszer a következő 
hivásig ezt a puffert használja. Csak a 0-ás szeletről használható. 


13. BIOS rutin: READ 

A kijelölt blokkot beolvassa a memória pufferbe. Ha olvasás közben hiba történik, a 
rendszer újra próbálkozik. Többszöri sikertelen kísérlet esetén az A regiszter tartalma 
O1H lesz. A rutin ellenőrzi, nem cserélték-e ki a lemezt. Ha igen, A értéke -1, azaz OFFH 
lesz. Csak a 0-ás szeletről hívható! 


14. BIOS rutin: WRITE 

A kijelölt blokkba írja az adatpuffer tartalmát. Ha hiba történik, a rendszer újra 
próbálkozik. Többszöri sikertelen kísérlet után A értéke OT1H lesz. Ha az utolsó hívás óta 
kicserélték a lemezt, A értéke -1, azaz OFFH lesz. 


15. BIOS rutin: LISTST 
A rutin ellenőrzi a rendszerben levő LST: perifériák állapotát. Ha valamennyi kész a 
következő karakter fogadására, akkor A értéke OFFH lesz, különben 004H. 


16. BIOS rutin: SECTRN 

A BC-ben tárolt logikai szektor számot átalakítja a megfelelő fizikai szektorszámmá, s 
azt HL-be helyezi. A rutin meghívása előtt DE-be kell tölteni a kódtábla kezdőcímét. 
Csak a 0-ás lapról használható! 


17. BIOS rutin: CONOST 
A rutin ellenőrzi, hogy a rendszerben levő konzolok képesek-e karakter fogadására. Ha 
valamennyi képes, akkor A értéke OFFH lesz, különben 00H. 


18. BIOS rutin: AUXIST 
Ellenőrzi, hogy érkezett-e valamelyik AUXIN: eszközről karakter. Ha igen, akkor A értéke 
OFFH lesz, különben 004H. 


19. BIOS rutin: AUXOST 
Ellenőrzi, hogy valamennyi AUXOUT: eszköz képes-e a következő karakter fogadására. 
Ha igen, akkor A értéke OFFH lesz, különben 004H. 


20. BIOS rutin: DEVTBL 
A rutin HL-ben a karakter tábla kezdőcímével tér vissza. 


21. BIOS rutin: DEVINI 
A rutin inicializálja a C regiszter által kijelölt fizikai karakteres egységet. 


22. BIOS rutin: DRVTBL 

HL-ben a lemezegységeket leíró tábla kezdőcímével tér vissza. A leíró tábla 16 bites 
szavakból áll, amelyek a szóbanforgó lemezegység DPH-járá mutatnak. Ha ennek értéke 
0, akkor a lemezegység nincs a rendszerben. Csak a 0-ás szeletről hívható! 
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23. BIOS rutin: MULTIO 
C-ben megadható az egyszerre olvasandó szektorok száma. Egyszerre maximum 16K 
vihető át. Csak a 0-ás szeletről hívható. 


24. BIOS rutin: FLUSH 

A rutin hatására a puffer tartalma fizikailag is a lemezre íródik. A FLUSH utáni olvasás 
egyben fizikai olvasást is jelent. Csak a 0-ás szeletről hívható. A lehetséges értékek 
visszatéréskor a következők: 


A Jelentés 
00H nem törtent hiba 
01H felismerhetetlen hiba 
02H csak olvasható lemezegység 
OFFH a lemezt kicserélték 


25. BIOS rutin: MOVE 

Memóriablokk mozgatása. A rutin meghívása előtt a DE-be be kell tölteni az első 
másolandó byte címét, HL-be pedig azt a címet, ahova másoljuk. BC tartalmazza a 
másolandó byte-ok számát. A rutin végén DE és HL az utolsó átmásolt byte régi és új 
helyére mutat. 


26. BIOS rutin: TIME 

Az óra beállítása. Ha C értéke 00H, akkor a rendszer az SCB-ben (System Control Block) 
levő értéket írja be az óraregiszterekbe. Ha C-OFFH, akkor az órában levő értéket a 
rendszer az SCB területre olvassa. A rendszer pakolt decimális formában tárolja az óra, 
perc, másodperc értékét. A CP/Mt a 6526-os CIA chip óráját használja. Vigyázat: a rutin 
megváltoztatja HL és DE értékét! 


27. BIOS rutin: SELMEM 

Memória szelet kiválasztása. A hívó rutinnak a közös memóriarészben kell lennie. Az A 
akkumulátor értéke adja meg, hogy az 1-es vagy a 0-ás memóriaszeletet használja-e a 
rendszer. 


28. BIOS rutin: SETBNK 

Beállítja, hogy a lemezműveletek  puffere melyik  memóriaszeleten legyen. A 
memóriaszelet értékét az A regiszterbe kell betölteni (0 vagy 1). Csak a 0-ás lapról 
hívható! 


29. BIOS rutin: XMOVE 

A MOVE funkció nem képes memóriaszeletek közti másolásra. Ha ezt akarjuk elérni, 
akkor a B és C regiszterekbe kell megadnunk a másolatot, illetve a másolandó byte- 
okat tartalmazó szelet sorszámát (0 vagy 1). Csak a 0-ás szeletről hívható! 


30. BIOS rutin: USERF 

8502 BIOS felhasználói rutin hívása. Az A regiszterben kell megadni a rutin, a H 
regiszterben a felhasználói funkció számát. Az egyes funkcióknak teljesen eltérő 
jelentése van. A felhasználói rutinok funkcióit a 12.3 részben részletesen ismertetjük. 


31. BIOS rutin: RESERV1 
Későbbi fejlesztésre fenntartva. 


32. BIOS rutin: RESERV2 
Későbbi fejlesztésre fenntartva. 
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12.3 BIOS felhasználói rutinok 

Felsoroljuk a 30. BIOS rutin alprogramjait. Az alprogram sorszámát a BIOS hívása előtt 
az A regiszterben kell elhelyezni. Az esetleg szükséges további paramétereket az egyes 
alfunkciók leírásánál adjuk meg. 

Az egyes funkciók nem kizárólag a processzor regiszterekben kapják a paramétereket, 
hanem a memóriából is. Ezek a következők: 


Memória Elnevezés 


FDO1 VIC$CMD a 
FD02 VIC$DRV 

FD0O3 VIC$TRK 

FD0O4 VIC$SECT 

FDO5 VIC$COUNT 

FD06 VIC$DATA 

FDO7 CUR$DRV 

FD0O8 FAST 


0. funkció: A 0.szeletről byte olvasása. 
További paraméterek: DE - memória cím 
Működés: A rutin a DE-ben megadott O.szeleten levő byte-ot a C regiszterbe helyezi. 


1. funkció: A 0.szeleten levő byte írása 
További paraméterek: DE - memória cím 
C - beírandó byte 
Működés: A rutin a 0.szelet DE címére írja a C-ben levő byte-ot. Ha ez a ROM-ban van, 
akkor (nem írja be és) visszatéréskor A értéke FFH (különben 0). 


2. funkció: Billentyűzet olvasása. 

További paraméterek: nincs 

Működés: A rutin a billentyűzeten éppen lenyomott billentyűre vonatkozó információval 
tér vissza. B-ben a rendszer a billentyű kódtáblázatbeli relatív helyzetével tér vissza. Ha 
B-FFH, akkor nem talált lenyomott billentyűt. Az A regiszterben a rutin a lenyomott 
billentyű kódját (táblázatbeli értékét) adja vissza. HL az A-ban levő érték táblázatbeli 
helyére mutat. C a váltók használatára vonatkozó információt tartalmazza: 


1 és O bitek — Jelentés 


00 kis betű 

01 nagy betű 
10 shiftelt jel 
1 C- billentyű 


A kódtáblázat elejére az FDO9gH címen levő mutató mutat. 
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3. funkció: 280 ROM rutinok végrehajtása 

További paraméterek: L az alfunkció számát tartalmazza. 

Működés: Az L értékétől függő rutint hajtja végre. Az egyes alfunkciók paraméterei 
eltérőek. Az alfunkciók száma mindig páros. Az első 80 rutin a 40, illetve 80 oszlopos 
képernyő kezelését végzi. Az alábbi felsorolásban csak a 80 oszlopos rutinokat soroljuk 
fel. A 40 oszlopos - hasonló feladatokat végző - alfunkciók sorszáma 2-vel nagyobb. 


0. alfunkció: karakter kiírása. A D regiszterben levő karaktert írja ki, s a kurzort is 
B CSE GTV ÖT TSAK 
atallitja. 


4. alfunkció: kurzor beállítása. A D a sor, az E az oszlop sorszámát tartalmazza. 


8. alfunkció: a kurzort egy sorral feljebb mozgatja. Ha a kurzor a képernyő tetején volt, 
hatastalan. 


12. alfunkció: kurzort egy sorral lejjebb mozgatja. Ha a kurzor az utolsó sorban volt, a 
rutin a kepernyőt egy sorral feljebb tolja. 


14. alfunkció: nincs megírva. 


16. alfunkció: a kurzort egy pozícióval balra mozgatja. Ha a képernyő bal szélén állt a 
10. alfunkció: 
kurzor, hatastalan. 


20. alfunkció: kurzort egy pozícióval jobbra mozgatja. Ha a kurzor a képernyő jobb 
szélén volt, hatástalan. 


24. alfunkció: CRETURN5 végrehajtása. 


28. alfunkció: törlés a sor végéig. Törli a sort a kurzortól a sor végéig. (A kurzor helyén 
REZET AT EKAEZOT erett § 
levő karaktert is!) 


32. alfunkció: törlés a képernyő végéig. Törli a képernyőt a kurzortól a képernyő végéig, 
beleértve a kurzor helyén levő karaktert is! 


36. alfunkció: karakter beszúrása. A rutin a kurzor helyére egy szóközt szúr be, s a több 
karaktert jobbra lépteti. A sor végén álló karakter elvész. 


40. alfunkció: karakter törlése. A kurzor helyén levő karaktert törli. A kurzortól jobbra 
levő karaktereket egy hellyel balra lépteti. A sor végén egy szóköz jelenik meg. 


44. alfunkció: sor beszúrása. A kurzor sorába egy üres sort szúr be a rutin. A kurzor 
ogy ove Pane egz ege een az (A É 4 
alatt levo sorok eggyel lejjebb csúsznak, s az utolsó sor elvesz. 


48. alfunkció: sor törlése. A kurzor sorát törli a rendszer. A kurzor alatt levő sorok 
eggyel feljebb csúsznak, alul egy üres sor keletkezik. 


50. alfunkció: nincs megírva. 


52. alfunkció: a kurzor színének beállítása. A B regiszterben megadott értéknek 
Legy ETTITI gotay Ae N] ag , 
megfelelően allítja be a kurzor szinet. 


56. alfunkció: a 8O oszlopos képernyő attributumainak beállítása. Az  alfunkció 


ki/bekapcsolja a 8563-as VDC chip rattributumait. B-ben magasra kell állítani azokat a 
biteket, amelyeket változtatni akarunk. C-ben pedig ezek értékét kell megadni. 
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60. alfunkció: a 80 oszlopos képernyő memória olvasása. D-ben a sor, E-ben az oszlop 
számát kell megadni. A rutin B-ben a karakter kódját, C-ben az attributum memóriában 
levő értéket adja vissza. A megfelelő (62.) 40 oszlopos alfunkció csak az inverz alakról 
ad információt. 


64. alfunkció: a 80 oszlopos képernyő memóriájába írás. A rutin meghívása előtt meg 
kell adni D,E-ben a sor,oszlop értékét. B-ben a karakter kódját, C-ben pedig az 
attributumát. 


68. alfunkció: színek olvasása. A rutin a képernyő színeit olvassa. Az egyes regiszterek 
tartalma: 


A - karakter színe; 

- háttér szín; j 

- keret színe (csak 40-es képernyő esetén); 

- a karakter attributuma (csak 80-as képernyő esetén). 


900 


80. alfunkció: sávkonverzió. 


82. alfunkció: CBM kód ellenőrzése. A rutin ellenőrzi, hogy a lemezegységben levő 
lemez 1. sávjának 0. szektorában ott van-e a CBM kód. Csak GCR lemezek esetén 
használható. Visszatéréskor a Z jelző 1, ha a rendszer C128-as lemezt használ, s 0, ha 
C-64-est. Az A regiszter 0, ha a lemez egyoldalas, FFH, ha kétoldalas. 


84. funkció: hangjelzés adása. 


96. funkció: kurzor helye a 40-es képernyőn. Az alfunkció a kurzor fizikai helyét 
szamítja ki a 80-oszlopos logikai képernyőre helyezett ablak helyzetéből. 


98. alfunkció: kurzor helyének beállítása. A rutin meghívja a 96. alfunkciót majd annak 
eredménye felhasználásával úgy görgeti a 40 oszlopos képernyőt a logikai 80 oszlopos 
képernyőn, hogy a kurzor a látható részben legyen. 


100. alfunkció: 40 oszlopos képernyő aktualizálása. Ha a (2Doff40 és old$offset változók 
erteke nem egyezik meg, akkor a rutin a 40 oszlopos képernyőt aktualizálja. 


102. alfunkció: teljes képernyő görgetése. Az előző alfunkciók csak az éppen aktualizált 
KEZET NLG TET EVENT EEG . .. , [A r" 4 tl 9. ) A" 
sort mozgattak. Ez a rutin - szükseg eseten - a teljes 40 oszlopos kepernyőt újra írja. 


104. alfunkció: üzenet kiírása. A rutin mind a két képernyőre kiírja azt az üzenetet, 
esszaT pa VEZEPT 770 AT STI 2 .! [4 4 (4 a. 

aminek első byte-jára a verem tetejen levő ertek mutat. Az üzenetet egy 0 byte-tal kell 
befejezni. 


106. alfunkció: üzenet kiírása. Ugyanaz, mint az előbbi, de az üzenet elejére a DE 
ESETET PETERT GYE TEA e je zee EZ] 
regiszterpár mutat. 


112. alfunkció: ASCII 2 képernyő kód konverzió. Az ASCII kódot a B regiszterben kell 
megadni, a képernyő kódot az A regiszterben kapjuk vissza. A rutin nem konvertálja a 
vezérlő karaktereket. 


114. alfunkció: kurzor helyének beállítása. A rutin meghívásakor a 0. szelet 2409H címén 


levő kétbytel-os mutató a logikai képernyő egy helyére mutat. A rutin erre a helyre 
állítja be a fizikai kurzort (a 40 oszlopos fizikai képernyőn). Visszatéréskor: 
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kurzor mutató 
DE - a kurzor sorának kezdete 
z karakterek száma a sor végéig 


pg 
F 
u 


116, alfunkció: A 80-oszlopos képernyő kurzorát az előbbihez hasonlóan átállítja. A 
használandó memóriacím: 0. szelet 24114H. 


118. alfunkció: szín beállítása. A rutin a 8563 VDC színeit a VIC színeire állítja be. B-ben 
a beállítandó szín típusának, C-ben a szín értékének kell lennie. Visszatéróskor HL a 
logikai színtáblára mutat. A színtípusok a következők: 


B típus 

00 karakter színe; 
10 háttér színe; 
20 keret színe. 


122. alfunkció: karakter feltöltés a 8563 memóriájában. A rutin a 8563 memóriájában 
maximum 256 byte-ot feltölt a D-ben levő byte-tal. Az attributum memóriát - ezzel 
párhuzamosan - az E-ben levő byte-tal tölti fel. A címet a veremre kel! helyezni, BC a 
feltöltendő byte-ok számát tartalmazza. 


124. alfunkció: blokk másolása a 8563 memóriájában. A rutin a 8563 memóriájában - 
maximum 256 byte-ot - átmásol. A meghíváskor a verem tetején kell lennie a 
másolandó rész kezdőcímének, a DE-ben a másolat kezdőcímének, míg BC-ben az 
átmásolandó karakterek számának. 


126. alfunkció: karakter definiálása a 8563 memóriájában. DE az új karakter alakjának 
kezdőcíme a Z80 memóriájában. B adja meg az újonnan definiált karakterek számát. A 
verem a 8563-beli kezdőcímet tartalmazza. 


4. funkció: 8502 BIOS hívások. 

További paraméterek: L-ben az alfunkció számát kell megadni. Esetenként további para- 
méterek megadására is szükség lehet. 

Működés: A 8502 BIOS hívások beállítanak néhány paramétert, majd átváltanak a 8502 
processzorra és ott hajtják végre a megfelelő funkciókat. 


-1. alfunkció: Az L-FFH értékű alfunkció inicializálja a C-128-at. Hatása megegyezik a 
RESET gomb megnyomásával. 


0. alfunkció: A 8502 inicializálása. Beállítja a $0314-$0319 megszakító vektorokat, a PAL 
változót, lezárja a nyitott csatornákat, végül beállítja az összes olyan rendszerváltozót, 
ami a 280 és 8502-es közti átkapcsoláshoz szükséges. 


1. alfunkció: 1541-es olvasás. Az olvasandó blokk sáv és szektorszámát a VIC$TRACK, 


illetve VIC$SECTOR változókban kell megadni. A VIC$DRV változó alsó négy bitje az 
alábbi megnyitási módoknak felel meg: 


395 


BIOS funkcióhívások Commodore 128 


Érték .  Egységszám BASIC megfelelő 
1 8 OPEN 8,11,15 
2 9 OPEN 9,12,16 
3 10 OPEN 10,13,17 
4 11 OPEN 11,14,18 


A rutin lefutása után a kívánt blokk a OFEOOH címen kezdődő pufferbe kerül, míg a 
VIC$DATA változó értéke az olvasás eredményéről tájékoztat: 


0 ($00) nincs hiba 

11 ($0B) a lemezt az egységben kicserélték 
13 ($0D) Írás/olvasási vagy csatorna hiba 

15 ($0F) a lemezegység nincs a rendszerben 


2. alfunkció: 1541-es Írás. Az adatok beállítása hasonló, mint az előbbi rutinnál. Az 
adatokat a rutin a OFEOOH pufferből írja ki. 


3. alfunkció: 1571-es előkészítése olvasásra (MFM vagy GCR formátum). A sáv és 
szektorszámot a VIC$TRACK, illetve VIC$SECTOR változókban kell megadni. Ha egy 
lemez hátoldalát akarjuk olvasni, akkor a VIC$SECTOR 7. bitjét magasra kell állítani. Ezek 
lehetséges értéke a használt lemez formátumától függ. A beolvasandó blokkok számát a 
VIC$COUNT változóban kell megadni. Ha a (FAST AND VIC$DRV) érték nullától 
különböző, akkor az adatátvitel a gyors protokoll szerint történik. A rutin végén a 
VIC$DATA jelentése ugyanaz, mint a 1541-es írás/olvasáskor. Kivétel: a 12 ($0€), 
aminek jelentése: a lemezegység nem 1571-es (vagy 1570-es). Ha gyorsolvasást 
állítottunk be és a rutin lefutása után (FAST AND VIC$DRV) nem nulla, akkor 1541-es 
egységről van szó. 


4. alfunkció: 1571 előkészítése írásra. A sáv és szektorszámot ugyanúgy kell beállítani, 
mint az előző esetben. Ugyancsak meg kell adni a VIC$COUNT értéket is. 


5. alfunkció: 1541-es vagy 1571-es mód lekérdezése. A használni kívánt lemezegység 
számát (8-11) a VIC$DRV változóba kell helyezni. A rutin ellenőrzi, hogy MFM vagy GCR 
formátumú lemez van-e benne, beállítja a FAST írási/olvasási módot. A rutin végén a 
VIC$DATA alsó 4 bitje a FAST-mód állapotkódját, felső 4 bitje pedig az MFM lemezek 
szektor méretét tartalmazza. 


6. alfunkció: lemezegység lekérdezése. A rutin (ha hibátlan) a lemez állapotával, a 
szektormeérettel (MFM esetén), illetve OFEOOH-tól 6 byte további információval tér 
vissza. Ezek a következők: 


FE00 sáv állapota 


FEO1 szektor szám sávonként 

FEO02 logikai sáv 

FEO03 minimum szektor szám (ezen a sávon) 
FEO4 maximum szektor szám (ezen a sávon) 


FEO5 töltő karakter (physical interleave) 


VIC$DATA tartalmazza az esetleges hiba okát, hasonlóan az 1. alfunkcióhoz. 
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7. alfunkció: karakter küldése a nyomtatóra. A rutin meghívása előtt VIC$DRV-ba kell 
beírni az egységszámot (4,5), VIC$TRACK-be azt a másodlagos címet, amivel a 
nyomtatót megnyitottuk. VIC$DATA tartalmazza a kiírandó karaktert, feltéve, hogy 
VIC$COUNT-O0. Ha VIC$COUNT nem 0, akkor annyi darab karakter íródik ki. Az első 
kiírandó karakter helyére az FEOO-tól levő pufferben a OFEOOH mutat. 


8. alfunkció: 1541-es vagy 1571-es lemez megformázása. Ha a FAST mód megengedett, 
akkor egy, a OFEO1H-tól kezdődő parancsot is elküld a rendszer. A parancs hossza a 
OFEOOH-ban van. A parancsot mindig megelőzi egy "U0" elküldése, ezért a parancsnak 
ezt a részét nem szabad a pufferba beírni. 


9. alfunkció: Felhasználói 8502-es kódú rutin meghívása. A rutin kezdőcímét az 
FDO5,FDO6 helyekre kell tölteni alsó, felső byte sorrendben. A 8502-es processzor 
bekapcsolásakor az MMU regiszter értéke $3E. Ez a 0-ás szeletet és az I/O regiszterek 
használatát jelenti. A visszatéréskor ennek ugyanígy kell lennie. A Z80 visszakapcsolása 
a RTS (8502-es kód!) végrehajtása után történik. Ekkor a 8502-est 1MHz-es órajellel 
kell üzemeltetni, különben a rendszer lemerevedhet. 


10. alfunkció: RAM lemez olvasása. 

11. alfunkció: RAM lemez írása. 

12. alfunkció: a €40/B80 DISPLAY5 billentyű állapotának lekérdezése. A rutin az A 
regiszterbe olvassa az MMU $D505 regiszterének tartalmát. Ha a 7. bit magas (1), akkor 
a €c40/80 DISPLAY5 billentyű nincs lenyomva, ha a bit alacsony, akkor lenyomott 


állapotban van. 


255. funkció: Rendszer dátum beállítása 
További paraméterek: HL tartalmazza az 1978. január 1-e óta eltelt napok számát. 
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13. fejezet 
Turbo Pascal 


13.1 A Turbo Pascal(r) felépítése 


A CP/Mi operációs rendszer egyik előnye, hogy a CP/Mt operációs rendszer alá 
készített (azaz a szabvány BIOS és BDOS funkciókat használó) Z80-as programok 
változtatás nélkül használhatók. A 1571-es lemezegység használatakor még az az előny 
is megvan, hogy ugyanazt az adathordozót használhatjuk, mint a többi CP/M gép 
esetében s nincs szükség bonyolult konverziókra. 


A 16 bites gépeken a Turbo Pascal ma már azzal fenyeget, hogy kiszorítja a 8-bites 
gépeken még ugyancsak elterjedt BASIC-et, s egyeduralkodóvá válik. Ahogy a Borland 
International reklámja szól: a Turbo Pascal a század programozási nyelve. 


A Turbo Pascal a Standard Pascal egyik nyelvjárása. File kezelése lényegesen eltér attól 
s számos eljárás és függvény egészíti ki. A Turbo elnevezés indokolt, a Turbo Pascal 
jelenleg a leggyorsabb Pascal fordító. A mérete sem megvetendő: a V2.O3A verziójú 
fordító mindössze 30Kbyte! A 8 és 16 bites változatokból 1985 végéig több mint 
400,000 példányt adtak el! 


A Turbo Pascal 8 bites változatát a Borland International a Commodore 128-ra is 
implementálta. Ebben a fejezetben ennek a programnak a használatát ismertetjük. 


A Turbo Pascal egy memória rezidens program szerkesztőből, egymenetes fordítóból és 
futtató rendszerből áll. Az egyszerűbb esetben a memóriában a program szövege, a 
lefordított program és a program adatai is elférnek. Nagyobb programok esetén 
lehetőség van a lefordított program különálló futtatására is. Ekkor a rendszerből csak a 
futtató rész (és természetesen a lefordított program) van a memóriában. Így közel 
22Kbyte memória nyerhető. Végül lehetőség van átlapolt programok fordítására és 
futtatására. A programok szövege forrás és gépi kódú programrészekre való 
hivatkozásokat tartalmazhat. 


A CP/Mt indítása után (lásd I.kötet 153. oldal) a Turbo Pascai rendszer a 
A:5Turbo 


parancs kiadásával indítható. Ha gyakran használjuk a rendszert, célszerű. a fenti 
parancsot a PROFILE.SUB file-ba is beiktatni (lásd I.kötet 168. oldal). 


A Turbo Pascal programszerkesztője többkarakteres parancsokat is használ. Ezért a 
funkcióbillentyűket s esetleg a numerikus billentyűzet néhány billentyűjét célszerű 
ezekre a karakterekre átprogramozni. Erre a 11. fejezetben ismertetett KEYFIG 
segédprogramot használhatjuk. Az átprogramozás után a KEYFIG-gel a billentyűk új 
definícióit elmenthetjük a CP/M lemezre. Ezek után a rendszer betöltésekor az új 
billentyű definíciók automatikusan érvényessé válnak. 
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A Turbo Pascal esetén az alábbi billentyűzet kiosztást célszerű használni: 


Billentyű Karakter Jelentés 

sorozat 
cSF15 1AaB blokk elejére 
LF25 1OK blokk végére 
cF35 1KB biokk elejének beállítása 
cF4. 1KK blokk végének beállítása 
cF55 1KC blokk másolása 
cF65 1 KH blokk kijelzésének törlése 
SF75 1KR blokk beolvasása 
FB: 1 KW blokk kiírása 
SSTOP5 1KD szerkesztés vége 
SENTER5 1KDS szerkesztés vége és a szövegfile elmentése 
2419. 1 AR szövegfile elejére 
2-"- 1ac szövegfile végére 


n ; a numerikus billentyűzeten! 


A rendszer betöltése után a következő logo jelenik meg: 


TURBO Pascal system Version xXx.xxA 
CP/M-8O, 280 


Copyright (c) 1983,1984 by BORLAND INC. 


Terminal: Commodore 128/ADM 31 


Include error messages (Y/N)? B 
Loading A: TURBO.MSG 


A bejelentkezés után a rendszer megkérdezi, hogy a hibaüzenetek szövegét betöltse-e 
a memóriába. Igen válasz, azaz az CY5 billentyű megnyomása után a szövegfile a 
memóriába töltődik. Ha az CN5 billentyű megnyomásával válaszolunk, akkor a hibáknak 
csak a sorszáma íródik ki. A hibaüzenetek mintegy 2Kbyte-tal csökkentik a rendelke- 
zésre álló memóriaterület nagyságát. 
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A fentiek után megjelenik a Turbo Pascal főmenüje: 


Logged drive: A 


Work file: 
Main file: 


Edit Compile Run Save 
eXecute Dír 98uit compiler Options 
Text: 0 bytes(802A-802A) 


Free: 27099 bytes(802B-EA06) 
5H 


A menüből a zöld (fekete-fehér monitoron sötétebb színű) nagybetűvel megjelölt 
billentyűk lenyomásával lehet választani. A SHIFT váltót nem kell használni. (A szabad 
memóriaterület vége attól függ, hogy milyen rezidens bővítések vannak a rendszerben. 
A szöveg eleje mutató attól függ, hogy betöltöttük-e a hibaüzenetek szövegeit-e vagy 
sem. 


Az egyes menüpontok használata a következő: 


L: az aktuális lemezegység betűjelét kell megadni. Erre a lemezegységre menti a fordító 
a szövegfile-okat és ezen helyezi el a lefordított programot. A lehetséges érték az A-P 
tartományba esik. 


D: az aktuális lemezegység katalógusát a képernyőre listázza. A menüpont kiválasztása 
után megkérdezi, hogy milyen file nevekre vagyunk kiváncsiak. A x és ? karakterek 
használhatók. Ha nem adunk meg paramétert, az a x.k-nak választásának felel meg. 


O: visszatérés a CP/M operációs rendszerhez. A rendszer nem kérdez vissza, hogy 
valóban ki akarunk-e lépni a programból. Ha azonban a "Work" file-t még nem 
mentettük el, akkor rákérdez, hogy elmentse-e. Ha "Y-nal válaszolunk, akkor a mentés 
megtörténik. 

C: A kiválasztott opciónak megfelelően lefordítja a programot. 

O: A fordítási opció kiválasztása. A Turbo Pascal programokat lényegében véve 
háromféleképpen lehet lefordítani. Ennek megfelelően a következő almenü jelenik meg: 


compile z , Memory 
Com-file 
cHn-file 


Find run time error Ouit 
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Az almenüből újból a nagybetűk szerint lehet választani. A "compile -" felirat a 
lehetséges három fordítási mód közül az utoljára kiválasztott előtt jelenik meg. Az 
egyes opciók jelentése a következő: 


O: visszatérés a főmenüre. 


F: Ha nem a memóriába fordított programot futtatunk, akkor futás közbeni hiba esetén 
a program a hibaüzenet mellett az utasításszámláló értékét írja ki. A fenti opció 
segítségével megkereshetjük a hiba helyét. Az opció választása után az első kérdésre 
az utasításszámláló értékét, majd a program nevét kell beírni. Ezután - mintha a 
memóriában levő program okozta volna a hibát - a szerkesztőbe kerülünk, s a kurzor a 
hibát okozó sorra áll. 


A C, H és M opciók választásával a fordítás módját szabályozhatjuk. A C opció esetén 
egy .COM file-t állít elő a fordító, amit a CP/M-ből közvetlenül futtathatunk. Ha a H 
opciót választjuk, akkor a fordítás ugyancsak egy lemezes file-t állít elő, de a run-time 
modult a rendszer nem fordítja hozzá, s a filenév kiterjesztés .CHN lesz. Az ilyen file- 
okat átlapolt programok írására használhatjuk. Végül az M opció választása után a 
rendszer a memóriába fordít. Ebben az esetben a lefordított programot nem tudjuk 
lemezre menteni. (Ez utóbbi a fordító alapértelmezése.) 


X: a Turbo Pascal lehetőséget biztosít tetszőleges .COM végű file futtatására. A 
szövegfile-t automatikusan elmenti, betölti a TURBO.OVL programot, majd végrehajtja a 
kért parancsot. Ezután a TURBO.OVL segítségével visszatölti magát a TURBO-t és az 
elmentett szövegfile-t. 


W: A szerkesztendő file nevének megadása. A funkció választása után - ha előtte más 
file-t szerkesztettünk, s még nem mentettük el, a rendszer megkérdezi, hogy elmentse- 
e. Ezután megkisérli az aktuális lemezegységről betölteni a file-t. Ha nem találja, akkor 
úgy értelmezi, hogy új file-t kívánunk létrehozni. 


M: A Turbo Pascal lehetőséget nyújt arra, hogy a program szövegében könyvtári file- 
okra hivatkozzunk. Gyakran előfordul az, hogy a programon magán nem, csak a benne 
használt egyik könyvtári programrészen módosítunk. Ebben az esetben a "Main" file-nak 
az eredeti programot, míg a "Work" file-nak a könyvtári programot kell megnevezni. Ha 
"Main" file nevet is megadunk, akkor a szerkesztőből való kilépés után a Turbo Pascal 
azonnal elmenti az éppen szerkesztett file-t, betölti és lefordítja a "Main" file-t. 


E: Attérés szerkesztő módba. 
C: A memóriában tárolt program lefordítása. 


R: A memóriában tárolt program lefordítása és futtatása. Ha a legutóbbi fordítás óta 
nem módosítottuk a szöveget, akkor a fordítás elmarad. 


A Turbo Pascal programok írása lényegesen eltér attól, ahogy a Commodore 64 vagy 
128-as módban kell a programokat megírni. A leglényegesebb eltérések a következők: 


a soroknak nincs sorszámuk; 

- egy új karakter beírásakor a program azonnal módosul; 
- a sor vége nem az utasítás vége is egyben; 

- egyszerre a teljes program módosítható. 
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A program szövege tulajdonképpen egyetlen hosszú sornak tekintendő, amit csak 
technikai okok miatt tördelünk szét sorokra. Egyetlen megkötés, hogy egy sor nem 
lehet hosszabb 127 karakternél. A programban csak a Turbo Pascal karaktereit hasz- 
nálhatjuk. Nincs például lehetőség a vezérlő karakterek grafikus karakterenként történő 
beírására, csak a chr függvényt használhatjuk! A Commodore-os programszerkesztők 
idézőjel üzemmódjának megfelelője sem létezik. (Osszehasonlításul: I.kötet 16.oldal) 


Ezen túlmenően mégis csak van egy megkötés a programok írására, ez azonban nem 
kötelező, hanem a struktúrák egymáshoz való viszonyának jobb elősegítését szolgálja. 
Az alacsonyabb rendű struktúra szövegrésze általában 3-4 karakterrel az öt magában 
foglaló struktúra szövegénél beljebb kezdődik. A fejezet példáiban ezt minden 
alkalommal megfigyelhetjük. 


A Turbo Pascal szerkesztője nem teszi automatikusan lehetővé, hogy a megszerkesztett 
programot egy másik néven mentsük el. Az elmentett program mindig a Work file-ban 
megadott file-ba kerül. Ha mégis más néven akarjuk tárolni, akkor a program elejét és 
végét jelöljük meg (CCTRL-K5B, CCTRL-K5-K) és a CCTRL-KSW vezérlő karaktersoro- 
zattal, mint egyetlen blokkot írjuk ki. A szerkesztő parancs kérni fogja a file nevét, majd 
elmenti a kijelölt blokkot (esetünkben az egész file-t). 


A program elmentése a főmenüből a Save kiválasztásával történik. Ha azon a néven 
már volt egy program, akkor azt a szerkesztő átnevezi. Pontosabban, ha a "Work file" 
kérdésére a PROBA.PAS file nevet adtuk meg, de ilyen file még nincs a lemezen, akkor 
New file üzenetet kapunk, és a program elmentésekor hozza létre a szerkesztő a file-t. 
Ha a file már létezik, akkor automatikusan a szerkesztő munkaterületére olvasódik. A 
program elmentésekor a régi file nevét a rendszer PROBA.BAK-ra változtatja, s az új 
programszöveget a szerkesztő a PROBA.PAS file-ba menti el. 
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13.2 A Turbo Pascal(r) programszerkesztője 


A főmenüből az E funkció kiválasztásával léphetünk be a szerkesztőbe. Ha a fordítás 
közben hiba történik, a rendszer ugyancsak a szerkesztőbe tér vissza. A szerkesztőből 
kilépni a tKD (CCTRL-K5 CD5) billentyűzéssel lehet. 


Szerkesztéskor a képernyő első sora az ún. parancssor: 
Line 1 Col 1 Insert Indent A:filenév 


A parancssor fehér betűkből áll, míg a rendes szöveg ettől eltérő színű (zöld vagy 
sárga) betűket tartalmaz. Ha kijelölünk egy blokkot, az ugyancsak ilyen színűre változik. 


Szerkesztésre a teljes képernyőt használhatjuk. Ha a program teljes szövege nem fér rá 
a képernyőre, akkor a képernyőt ablakként mozgathatjuk a szöveg felett. A kurzor 
mindenkori helyét a parancssorról olvashatjuk le. A parancssor jelzi azt is, hogy az 
éppen beírt karakter beszúródik-e a sorba (Insert) vagy felülírja a kurzor helyén levő 
karaktert (Overwrite). 


A kurzor mozgatására az alábbi karakterek használhatók: 


Funkció Vezérlő karakter Egyéb 
Kurzor egy karakterrei balra SICTRL-SZz SLBALRA- 
Kurzor egy karakterrel jobbra LICTRL-D: c JOBBRA: 
Kurzor a következő tabulálási pontra . CCTRL-I5 STAB5- 

Kurzor egy sorral feljebb 2CTRL-ES cCFEL- 

Kurzor egy sorral lejjebb Sa CTRL-X5 LES 

Kurzor a következő szóra SL CTRL-F5 ScCRSR BALRA: 
Kurzor az előző szóra SICTRL-A5 SLCRSR JOBBRA: 
Képernyő feltolása egy sorral SI CTRL-W5 SICRSR FEL 
Képernyő letolása egy sorral SxCTRL-Z5 SxCRSR LES 
Képernyő feltolása egy lappal SI CTRL-R5 

Képernyő letolása egy lappal SLCTRL-C5 

Új sor kezdés SxCTRL-M: cRETURN: 


A TAB pozíciók az előző sorban álló szavak első pozíciójára állítódnak be. Ha az IDENT 
paramétert bekapcsoltuk, akkor a CRETURN5 hatására még egy TAB karakter is 
kiíródik, s a kurzor az előző sor első nem szóköz karaktere alá kerül. Ha a sor üres volt, 
akkor a következő sor elejére. 
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A fenti egyszerű kurzor mozgásokat az alábbiak egészítik ki: 


Funkció Vezérlő karakter 
Sor elejére SxaCTRL-OSS 
Sor végére SxaCTRL-A5D 
Képernyő tetejére(2.sor) SxCTRL-O5E 
Képernyő aljára(24.sor) SICTRL-A5X 
Szöveg elejére SZCTRL-OA5R 
Szöveg végére SCTRL-A5C 
A kurzor utolsó helyére AxaCTRL-A5P 


A szerkesztő egy sor törlő és beszúró utasítást tartalmaz. Ezek segítségével karakterek, 
szavak és teljes sorok törölhetők. Lehetőség van kontrol karaterek beillesztésére. Ezek a 
kiírás formátumát vezérlik, a programot nem befolyásolják. A törlő/beszúró vezérlő 
karakterek az alábbiak: 


Funkció Vezérlő karakter 

A kurzor helyén levő karakter törlése SLCTRL-G- 

A kurzor utáni szó törlése SLCTRL-T5 

A kurzor sorának törlése SL CTRL-Y5 

A kurzortól a sor végéig törlés LxCTRL-AZY 

Új sor beszúrása SL CTRL-N: 

Kontrol karakter beszúrása SIxCTRL-P5 ckontrol kar.: 


A Turbo Pascal egy olyan lehetőséget nyújt a programíráshoz, amihez hasonló a 
BASIC-ben nincs meg: lehetőség van adott szövegrész megkeresésére és egy másikra 
való cserélésére. A keresés és csere módját szabályozni lehet. Ezek a módok a 
következők lehetnek: 

B: a keresés és a csere a kurzor helyétől visszafelé történik. 

G: a keresés és csere - a kurzor helyétől a teljes szövegben történik. 


JOK: xxx előjel nélküli egész szám. A keresés (és azután a csere) a megadott szöveg 
xxx-edik megjelenéséig tart. 


U: a keresés során a nagy és kisbetűkből adódó eltéréseket a szerkesztő figyelmen 
kívül hagyja. Pl. ha a KATI-t keressük, akkor a szerkesztő a Kati-t is megtalálja. 


W: Csak egész szavakat talál meg. A mód megadásakor a szerkesztő a KATIKA-t nem 
jelzi, ha a KATI-t keressük. 


N: Csere esetén nem kérdez vissza. Ha nem választjuk ezt a módot, akkor minden csere 
előtt visszakérdez, hogy végrehajtsa-e. 
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A keresés vagy csere végrehajtásához ki kell adni a megfelelő vezérlő 
karaktersorozatot, beírni a keresendő és cserélendő karaktersorozatot, megadni a 
módot. A rendszer ezután kezdi csak el a keresést, illetve a cserét. A használható 
karaktersorozatok az alábbiak: 


Funkció Módok Vezérlő karakter 


Karaktersorozat keresése BGUW XXX SxICTRL-OASF 


Karaktersorozat cseréje BGUWN xxx SIaCTRL-OSBA 
Az utolsó cserélő vagy 
kereső parancs ismétlése SICTRL-L- 


További vezérlő karakterek lehetővé teszik a szöveg egy tetszőleges részének 
kijelölését. Ezt a részt blokknak hívjuk. A blokkot a blokk elejének és végének 
kijelölésével lehet megadni. A blokkban levő szöveg fehér betűkkel jelenik meg a 
képernyőn. A kijelzés ilyen módja megszüntethető. Ezzel a blokk nem szünik meg: csak 
nem látszik. A maradék vezérlő karakterek a következők: 


Funkció Vezérlő karakter 
Blokk elejének megjelölése SICTRL-K5B 
Blokk végének megjelölése SI CTRL-K3K 
Kurzor a blokk elejére SLCTRL-A5B 
Kurzor a blokk végére SxaCTRL-ASK 
Egyetlen szóból álló blokk megjelölése Sa CTRL-K53T 
Blokk törlése cx CTRL-K5Y 
Blokk kijelzésének törlése (fehér) a CTRL-K5H 
Blokk kiírása lemezes file-ba Sa CTRL-K2W 
Blokk áthelyezése a kurzor helyére SL CTRL-K5V 
Blokk beolvasása lemezes file-ból SLCTRL-K53R 
Beszúrási/felülírási mód váltás SxCTRL-V5 
Automatikus bekezdés ki/be kapcsolása SICTRL-O5I 
A kiadott parancs törlése SL CTRL-U5 
A sor előző tartalmának visszaállítása SxCTRL-OSL 
Visszatérés a főmenühöz SLCTRL-K5D 


A kiadott parancs törlése természetesen a parancs már végrehajtott részének hatását 
nem szünteti meg. A CCTRL-O5L parancs működési mechanizmusa a következő. Ha a 
kurzorral egy új sorra lépünk, akkor annak tartalmát a szerkesztő elmenti. Ez az eredeti 
sor íratható vissza ezzel a paranccsal, amíg a sort el nem hagytuk. Ha a sort töröljük a 
SxCTRL-Y5, akkor ezzel az utasítással nem tudjuk a törölt sort visszaállítani. 


A Turbo Pascal programok írása lényegesen eltér attól, ahogy a Commodore 64 vagy 
128-as módban kell a programokat megírni. A leglényegesebb eltérések a következők: 
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a soroknak nincs sorszámuk; 

- egy új karakter beírásakor a program azonnal módosul; 
- a sor vége nem az utasítás vége is egyben; 

- egyszerre a teljes program módosítható. 


A program szövege tulajdonképpen egyetlen hosszú sornak tekintendő, amit csak 
technikai okok miatt tördelünk szét sorokra. Egyetlen megkötés, hogy egy sor nem 
lehet hosszabb 127 karakternél. A programban csak a Turbo Pascal karaktereit 
használhatjuk. Nincs például lehetőség a vezérlő karakterek grafikus karakterenként 
történő beírására, csak a  chr függvényt használhatjuk! A  Commodore-os 
programszerkesztők idézőjel üzemmódjának megfelelője sem létezik. (Osszehasonlításul: 
I.kötet 16.oldal) 


Ezen túlmenően mégis csak van egy megkötés a programok írására, ez azonban nem 
kötelező, hanem a struktúrák egymáshoz való viszonyának jobb elősegítését szolgálja. 
Az alacsonyabb rendű struktúra szövegrésze általában 3-4 karakterrel az öt magában 
foglaló struktúra szövegénél beljebb kezdődik. A fejezet példáiban ezt minden 
alkalommal megfigyelhetjük. 


A Turbo Pascal szerkesztője nem teszi automatikusan lehetővé, hogy a megszerkesztett 
programot egy másik néven mentsük el. Az elmentett program mindig a Work file-ban 
megadott file-ba kerül. Ha mégis más néven akarjuk tárolni, akkor a program elejét és 
végét jelöljük meg (CCTRL-K5B, CCTRL-K53K) és a CCTRL-KSW vezérlő karaktersoro- 
zattal, mint egyetlen blokkot írjuk ki. A szerkesztő parancs kérni fogja a file nevét, majd 
elmenti a kijelölt blokkot (esetünkben az egész file-t). 


A program elmentése a főmenüből a Save kiválasztásával történik. Ha azon a néven 
már volt egy program, akkor azt a szerkesztő átnevezi. Pontosabban, ha a Work file" 
kérdésére a PROBA.PAS file nevet adtuk meg, de ilyen file még nincs a lemezen, akkor 
New file üzenetet kapunk, és a program elmentésekor hozza létre a szerkesztő a file-t. 
Ha a file már létezik, akkor automatikusan a szerkesztő munkaterületére olvasódik. A 
program elmentésekor a régi file nevét a rendszer PROBA.BAK-ra változtatja, s az új 
programszöveget a szerkesztő a PROBA.PAS file-ba menti el. 
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13.3 A nyelv alapjai 


A Turbo Pascal - szemben a BASIC-kel vagy a FORTRAN-nal - struktúrált programozási 
nyelv. Ez egyes programstruktúrák vagy teljes egészében tartalmazzák egymást, vagy 
nincs közös részük. Egymásba skatulyázott programstruktúrák esetén a belső 
használhatja a külső változóit, de fordítva nem. 


A Turbo Pascal további sajátja, hogy típusos nyelv, azaz minden egyes használt változó 
típusát - annak használata előtt - meg kell adni. Hasonló igaz az eljárásokra és 
függvényekre is. 


A Turbo Pascal programok az alábbi karaktereket használhatják: 

s a kis- és nagybetűk: a-z és A-Z 

s a számjegyek: 0-9 

s az aláhúzás jele: 

s speciális jelek: t- x/- c 5()[]().,:"  §$1t és a szóköz 


Szemben a BASIC-kel a speciális jelek mindegyike elválasztó jelnek is számít. A 
szerkesztő a szó fogalmát erre alapozza. Ha tehát a CCTRL-A53 parancsot adjuk ki, 
akkor a kurzor visszafelé mozog az első elválasztó jelig, vagy szóközig. A szóköz 
kivételével a fenti speciális jeleknek saját jelentése van, s adott helyen nem cserélhetők 
fel egymással. 


A fordító nem tesz különbséget a kis- és nagybetűk között. Ha tehát azt írjuk, hogy 
sajatprogram vagy SajatProgam, az ugyanannak felel meg. Célszerű olyan neveket 
használni, ami pontosan leírja, hogy mire is használjuk. A név hossza maximálisan 127 
karakterből állhat. Az aláhúzás jelet is a nevek olvashatóbbá tétele érdekében szokás 
használni. Pl. célszerűbb a Kezdo Ertek írásmód, mind a kezdoertek használata. Mindez 
természetesen csak a programok olvashatóságát növeli. 


A Turbo Pascal 43 ún. alapszót ismer. Ezeket más célra nem lehet felhasználni. Ezeken 
túl több mint 100 előre definiált szót tartalmaz a nyelv. Ezek újra definiálhatók. (Bár ezt 
a gyakorlatot nem javasoljuk!) Az alapszavak a következők: 


absolute and array begin 
case const div do 
downto else end external 
file for forward function 
goto if in inline 
label mod nil not 

of or packed procedure 
program record repeat set 

shi shr string then 

to type until var 
while with xor 


A programban használt nevek részként tartalmazhatják ezeket a szavakat. Pl. a new file 
elnevezés használható, annak ellenére, hogy a file egy alapszó, a new pedig egy előre 
definiált szó. Egy ilyen azonosító használata sem a file, sem a new jelentését nem 
befolyásolja. Ennek oka, hogy a fordító az elválasztó jelek közti részt tekinti egyetlen 
logikai egységnek. (A Commodore BASIC fordítók az alapszó végét - esetünkben a 
new-nál - tekintik elválasztójelnek.) 
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Azonosítók 

A Turbo Pascal azonosítói (vagy a használt nevek) betűvel vagy aláhúzással kezdődnek 
s ezt betűk, számjegyek és aláhúzások tetszőleges kombinációja követheti. Az azonosító 
hosszának csak az szab határt hogy a szerkesztő egyetlen sorában el kell férnie: ez 127 
karakter. 15-20 karakternél hosszabb azonosítók használata már rettentően kényelmet- 
len. (Lehet azt a gyakorlatot is követni, hogy 2-3 karakterből álló neveket használunk, 
majd a program elkészítése után a CCTRL-OBA szerkesztő paranccsal hosszabb, de 
kifejezőbb nevekre cseréljük.) 


Programstruktúra 
A Turbo Pascal (s a Standard Pascal) programok is az alábbi formában épülnek fel: 


S program fejléc: 
S deklarációs részz 
c végrehajtható rész-. 


Nézzük sorra, hogy az egyes részek miből is állnak! 


A dcprogram fejlécs - szemben a Standard Pascal-lal el is maradhat. Ha mégis 
szerepel, akkor a program alapszóval kezdődik, amit a program neve és esetleg 
zárójelben vesszővel elválasztva a programban használt file-ok nevei követnek. Mindezt 
egy pontosvessző zárja le. A Cprogram fejlécS-et a fordító semmire sem használja, 
csak azért adható meg, hogy a Standard Pascallal a kompatibilitás megmaradjon. Azt 
javasoljuk, hogy a Cprogram fejlécs-et 


program Cprogram neves; 
alakban használják. 


A dSdeklarációs rész2-ben mindazokat az objektumokat (program komponenseket) 
deklarálni kell, amiket a Cvégrehajtható rész—-ben használni akarunk. A Sdeklarációs 
részz2 címke, konstans, típus, változó, eljárás és függvény deklarációkat tartalmazhat. A 
Standard Pascal-ban a fenti felsorolás egyben kötelező sorrend is, a Turbo-ban 
azonban nincs ilyen kikötés. Ne felejtsük el azonban, hogy mielőtt egy objektumot 
használni akarunk, előtte definiálni kell. Ha tehát a mondat kiírasa eljárásban használni 
akarjuk a szó kiírasa eljárást, akkor először a szó kiírasa eljárást kell deklarálnunk, majd 
a mondat kiírasa eljárást. 


A dcvégrehajtható rész5s tartalmazza azokat az utasításokat, amelyeket a programnak 


végre kell hajtania. Vegyük észre a program végén álló .-t! Minden programnak ezzel 
kell végződnie. 


Pascal deklarációk 
Címke deklarációk 
Bár a Turbo Pascal struktúrált nyelv, tervezői mégis lehetővé tették a "goto Ccímkes" 


alakú vezérlésátadást. Azokat az azonosítókat, amelyeket címkeként szeretnénk 
használni, a címke deklarációs részben keli felsorolni. Ennek alakja 
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label Ccímke listaz; 

ahol a címke lista egymástól vesszővel (,) elválasztott címkéket tartalmaz. A deklarációt 
egy további pontosvessző zárja. 

Konstans deklarációk 


A konstansok olyan változók, amelyek értékét nem lehet megváltoztatni. A konstans 
deklaráció megadja a konstans típusát és értékét is. A konstans definíció alakja 


caliterál2 
Skonstans azonosítós - 
Selőjelz Ckonstans azonosító: 


A konstansok definíciója miatt meg kell különböztetnünk magát a konstans azonosítóját, 
s az értéke megadására szolgáló jelsorozatot. Ez utóbbit hívjuk cliteráls-nak. A 
caliterál3 előjel nélküli vagy előjeles szám, illetve karaktersorozat lehet. A szimbolikus 
konstansok használata növeli a programok olvashatóságát. 

A konstans deklaráció alakja a következő: 

const Ckonstans definíció listaz; 

ahol a ákonstans definíció listaz egymástól vesszővel (, elválasztott konstans 
definíciókat tartalmaz. 

Típus deklarációk 

A Turbo Pascalban hat előre definiált típust használhatunk, ezek a REAL, INTEGER, 
BOOLEAN, CHAR, BYTE, STRING típusok. További lehetőségek vannak a már meglevő 
típusokból újak előállítására. Ez a lehetőség az egyike azoknak, amelyek a PASCAL-t sok 
egyéb programozási nyelvtől megkülönböztetik. Új típusok előállítására az ún. típus- 
műveletek szolgálnak. Egyes típus-műveletek egyben azt is meghatározzák, hogy az 
általuk létrehozott új típuson milyen műveletek végezhetők. 

A típusdeklarációs általános alakja a következő: 


ctpus azonosítós - ctípus leírász 


ahol a ctípus leírász a típus-műveletek és az előre definiált típusok segítségével épül 
fel. A típus deklarációs rész - ha egyáltalán szerepel - így néz ki: 


type ctípus definíció listaz; 
ahol a ctípus definíció listaz egymástól ;-vel elválasztott típus definíciókat tartalmaz. 


A típus definícióknál is érvényes az az elv, hogy egy típus definíciójában csak már 
definiált típusok használhatók fel. 
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A típus-deklarációk segítségével megadhatjuk, hogy milyen adatokkal is akarunk 
dolgozni. A változó adott típusú adatok tárolására szolgál. A változó definiálásakor meg 
kell mondani, hogy milyen típusú. A változó definíció lehetőséget biztosít egyidejűleg 
több azonos típusú változó definiálására is. Egy változó definíció az alábbi formájú: 


cváltozó listaz:ctípus leírás 


A gváltozó listaz egymástól vesszővel (,) elválasztott neveket tartalmaz. Minden egyes 
név típusa a ctípus leírász-nak megfelelő típusú lesz. A ctípusz vagy előre definiált, 
vagy ezt megelőzően már tipusdeklarációval megadott típus kell hogy legyen. 


A változó deklarációs rész általános alakja a következő; 
var ctípus definíció listasz; 


A cváltozó definició lista egymástól pontosvesszővel (;) elválasztott változó 
definíciókat tartalmaz. 


A továbbiakban felsoroljuk az előre definiált típusokat, s a rajtuk értelmezett 
műveleteket. 


INTEGER 

Az egész számok használatára a Turbo Pascal az INTEGER előre definiált típust 
biztosítja. Az INTEGER típusú számoknak a -32767..32768 intervallumba kell esniük. 
Ennek megfelelően a fordító ezeket a számokat 16 bites előjeles számként tárolja. A 
rendszer tartalmaz egy MAXINT nevű INTEGER változót, aminek az értéke 32768. Az 
INTEGER típus egy ún. rendezett típus (erről a későbbiekben részletesen lesz szó). A 
rendezés a természetes számokon szokásos rendezés. 


Egész számokat előjeles és előjel nélküli formában adhatunk meg. Használhatjuk még a 
$ jelölést is, ekkor a fordító egy hexadecimális számot vár. Pl. $8000--32768, $FFFF--1 
és $7FFF-32768. 


A Turbo Pascal-ban - a karakterkonverziók támogatására - előredefiniált típusként 
szerepel a BYTE. A BYTE típus rendezett típus és az INTEGER résztípusa. A BYTE a 
0..255 intervallumba eső egész számokból áll. 


REAL 

A REAL előre definiált típus a valós számok használatát biztosítja. A REAL típusú 
változókkal a szokásos műveletek végezhetők el. A Turbo Pascal-ban a valós számok 
megközelítőleg az 1.0E-38 .. 1.0E-438 intervallumba esnek, pontosságuk 11 decimális 
jegy. A REAL típusú változók tárolására a rendszer 6 byte-ot használ. 


REAL tipusú literálok vagy a tizedespontot vagy az E exponenst kell hogy tartalmazzák: 
123. vagy 123E0! 


A Turho Pascal-ból hiányzik az a beépített mechanizmus, ami automatikusan konvertál 
az egész és a valós számok között. Ha egy eljárás valahol egész számot vár, s mi 
valóst adunk meg, akkor hibajelzést kapunk. 


Egyetlen előredefiniált REAL típusú konstans van, ez a Pl. Értéke 3.1415926536. 
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CHAR 

A Turbo Pascal a CHAR előredefiniált típust egyetlen karakterből álló sztring kezelésére 
használja. A CHAR használata abból adódik, hogy a rendszer megkülönbözteti a BYTE és 
a CHAR típust. Ezek a chr függvény segítségével kölcsönösen és egyértelműen 
megfelelnek egymásnak, de adott eljárások és függvények esetében vagy csak az egyik 
vagy csak a másik típust használhatjuk csak. 


STRING 

A STRING előre definiált típus, a BASIC string típusához nagy mértékben hasonlít. Az 
egyetlen lényeges különbség, hogy sztring változók megadásakor meg kell adni annak 
maximális hosszát is: 


var 
proba: string[45]; 


A fenti deklaráció hatására a fordító 46 byte-ot foglal le. Az első (vagy 0.) byte a 
sztring hosszát, a többi byte a sztring karaktereinek kódját tartalmazza. Szemben a 
Commodore BASIC-kel a sztringek tárolása nem dinamikus. A sztringek maximális 
hossza 255 lehet. 


STRING (vagy CHAR) literálokat idézőjelek() közé kell írni. Ha az idézőjelek közé 
egyetlen karaktert írunk, akkor CHAR típusú literált kapunk. A karaktersorozatba vezérlő 
karaktereket is elhelyezhetünk. Erre két lehetőség van. Ha CHAR típusú literált akarunk 
megadni, akkor pl. a CCTRL-C5 megadására a TC jelsorozatot kell használni. Ugyanezt 
a 403 vagy $$03 jelsorozattal is megadhatjuk. Ha ezt a kontroll karaktert egy STRING- 
ben akarjuk elhelyezni, akkor az idézőjelet be kell zárni, s szóköz nélkül az előző 
sorozatot beírni. Ezután (szóköz nélkül!) új idézőjelet nyithatunk: 


const. 
Harang - 19; 
MasikHarang —- 407; 
Esc - $H$IF; 
Uzenet Eleje -— Uzenet HOZOTT át 


BOOLEAN 

A BOOLEAN előre definiált típus mindössze két értéket tartalmaz. Ezekhez előre definiált 
konstansok tartoznak: TRUE és FALSE. A szokásos logikai műveletek elvégezhetők. 
Osszehasonlítás eredményeként ugyancsak BOOLEAN értéket kapunk. A fordító a 
BOOLEAN változókat 1 byte-on tárolja. A BOOLEAN típus sem a BYTE sem az INTEGER 
típussal nem kompatibilis. 


Skalár (vagy rendezett típusok) 
A Turbo Pascal-ban rendezett típusnak számít az INTEGER, a CHAR, a BYTE és a 


BOOLEAN tipus, míg skalárnak valamennyi rendezett típus és a REAL típus: 

Lehetőség van rendezett típusok deklarálására is. Ezt olyan formában tehetjük meg, 
hogy felsoroljuk a típus valamennyi elemét. A felsorolás egyben sorrendjüket is 
megadja. Rendezett típust az alábbi formában kell definiálni: 


ctípus azonosító: - ( Cazonosító lista5); 


Az azonosítólista a típus elemeinek neveit tartalmazza vesszővel elválasztva. A hét 
napjait pl. a következőképpen definiálhatjuk: 


Turbo Pascal Commodore 128 


type 
HetNapjai - (Hetfo,Kedd Szerda Csutortok Pentek Szombat Vasarnap); 


A Turbo Pascal valamennyi rendezett típuson megengedi a rákövetkező, a megelőző és 
a hányadik függvények használatát: 


Succ(x) az x-et követő elem a típusban; 
Pred(x) az x-et megelőző elem a típusban; 
Ord(x) x sorszáma az adott típusba. 


A fenti típusdeklarációnál maradva: Succ(Hetfo)-Kedd, Pred(Szombat)-Pentek és 
Ord(Szerda)-2. A skalár típus nevét egyben függvénynek is használhatjuk. HetNapjai(4) a 
HetNapjai típus 4. sorszámú elemét adja, ami Péntek. (Az elemek sorszámozása 0-val 
kezdődik!) 


Résztípus 
A rendezett típusok intervallumai segítségével új típust lehet deklarálni. Ehhez az 
intervallum két kezdőpontját kell csak megadni: 


Selejez..Cvéges 


A két pont (.) a definícióban a "tól-ig"-ot reprezentálja. Például a fenti HetNapjai 
részeként definiálhatjuk a MunkaNapok és a MunkaszunetiNapok típusokat: 


type 
HetNapjai - (Hetfo.Kedd Szerda Csutortok Pentek Szombat Vasarnap); 
MunkaNapok - Hetfo..Pentek; 
MunkaszunetiNapok - Szombat.. Vasárnap; 


A résztípuson az összes olyan művelet elvégezhető, ami az eredeti típuson. A 
lefordított program minden egyes művelet elvégzése után ellenőrzi, hogy az eredmény 
is a résztípusba esik. Ha nem, akkor hibajelzést kapunk. 


Műveletek 

A következőkben felsoroljuk a skalár, rendezett típusokon végezhető, előre definiált 
műveleteket. A Turbo Pascal a műveletek végrehajtása során hat precedencia szintet 
különböztet meg. Ezek a következők: 


. Zárójelek: ( és ) 

. Ellentett képzés: - 

not 

x / div mod and shi shr 

. 4 - or xor 

. összehasonlítás: — 5 c 5 €- 5- in 


DNBON — 


Az azonos rangú műveleteket a rendszer balról jobbra értékeli ki. Vigyázat: a BASIC-ben 
az összehasonlítás kiértékelésének precedenciája más! 
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Egész típusú műveletek 


§ összeadas; 
- kivonás vagy ellentett képzés; 
x szorzás; 
Z osztás: az operandusok egészek vagy valósak lehetnek, az eredmény valós; 
div egész osztás: az operandusok csak egészek lehetnek, az eredmény a hánya- 
dos egész része; 
mod osztási maradék: az operáYtdusok csak egész számok lehetnek, az eredmény 
az osztás maradéka, ugyancsak egész szám. 


Valós típusú műveletek 


A valós számokon a négy alapművelet végezhető el, nincs külön hatványozás (Xt y): 


4 összeadás; 

- kivonás vagy ellentett képzés; 
x szorzás; 

7 osztás. 


Bitműveletek 
INTEGER vagy BYTE típuson bitenkénti logikai műveleteket lehet végezni. Ezek a 
következők: 


not bitenkénti invertálás; 
and — bitenkénti logikai és; 


or bitenkénti logikai vagy: 

xor bitenkénti logikai kizáró vagy; 

shr jobbra tolás adott számú bittel, az ellenkező oldalon 0-ák lépnek be. 
shi balra tolás adott számú bittel, az ellenkező oldalon 0-ák lépnek be. 


Logikai műveletek 

A logikai műveleteket BOOLEAN típusú mennyiségeken lehet elvégezni. A műveletek 
megegyeznek a fentiekkel, de nem bitenként hatnak, hanem a BOOLEAN. által 
reprezentált logikai értékeken: 


not logikai tagadás; 
and logikai és; 

or logikai vagy; 

xor logikai kizáró vagy; 


Összehasonlítás eredményeként BOOLEAN értéket kapunk. A relációs jelek a 
következőket jelentik: 


egyenlő (tetszőleges típus); 


Cc53  — nem egyenlő (tetszőleges típus); 

5 — nagyobb (skalár típus); 

a — kisebb (skalár típus); 
57- — nagyobb vagy egyenlő (skalár típus); 
c€a7- kisebb vagy egyenlő (skalár típus). 


Sztringműveletek 
A BASIC-hez hasonlóan a sztringeken egyetlen művelet végezhető: ez a sztringek 
összefűzése. Még a jele is ugyanaz: 1. 
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Ugyancsak a BASIC-hez hasonlóan további függvények vannak, amelyek a sztringekkel 
való műveletvégzést megkönnyítik. A táblázatban levő f jelenti a függvényt, e az 
eljárást: 


Eljárás/függvény Paraméterek Leírás 
neve 
Concat f csztringlistaz a sztringlistában szereplő sztringek össze- 
fűzése 
Copy f Csztring3: cChonnanz chányz a Csztring5-ből a cChonnan: pozíciótól 


kezdve kivesz Chány5 karaktert, s ebből 
egy új sztringet képez; 


Length — f csztring: a cCsztring5 hosszával tér vissza; 

Pos f csztring15 csztring2 5 a cCsztringi5 csztring25-beli pozíciójával 
tér vissza; ha ilyen nincs, akkor 0-val 

UpCase f ckarakter- a dckarakter53-nek megfelelő nagybetűvel 
tér vissza, ha az a "a"-—"z" intervallumba 
esik; 

Str e Cszám5 csztring5 az eljárás az INTEGER vagy REAL típusú 
cszám5 alakját Csztring2-be helyezi; 

Val e cCsztring3 Cszám5 ckód5 az eljárás a Csztring5-et számmá alakítja, 


s ezt a cszám53-ba helyezi el. Ckód5 az 
első fel nem dolgozható karakter sorszá- 
ma. Ha Ckód5-0, akkor rendben. 


Függvények 
A fenti függvények és műveletek a nyelv átdefiniálható részei. A Turbo Pascal még az 
alábbi egyváltozós függvényeket tartalmazza: 


Függvény Leírás Argumentum Eredmény 
Abs abszolút érték egész egész 
Abs abszolút érték valós valós 
ArcTan arkusz tangens valós valós 
Cos koszinusz valós valós 
Exp exponenciális valós valós 
Frac tört rész valós valós 
Int egész rész valós valós 
Ln természetes alapú valós valós 
logaritmus 
Sin szinusz valós valós 
Sar négyzetre emelés egész egész 
Sar négyzetre emelés valós valós 
Sart négyzetgyökvonás valós valós 
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Függvény Leírás 


Pred előző elem 

Succ következő elem 
Odd páratlan-e 

Chr ASCII konverzió 
Ord karakter konverzió 
Round kerekítés 

Trunc egész rész képzés 


A BASIC-et használók figyelmébe: az sgr a Turbo-ban 


Argumentum Eredmény 


rendezett rendezett 
rendezett rendezett 
egész logikai 
egész CHAR 
CHAR egész 
valós egész 
valós egész 


Turbo Pascal 


négyzetre emelés! A 


négyzetgyökvonás az sart! A round függvény a legközelebbi egészre kerekít. Az int nem 
változtatja meg a szám típusát, az továbbra is valós marad. Valós-- segész konverzióra 


a trunc függvényt kell használni. 


A Turbo-ban nincs exponenciális függvény. Ezért az xty kifejezést az exp(ly xIn(x)) 
kifejezéssel kell helyettesíteni! A szögek értéke minden esetben radiánban értendő. 
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13.4 Eljárások és függvények 


A Turbo Pascal egyik nagy előnye a BASIC-kel (s általában az interpretiv nyelvekkel) 
szemben, hogy lehetőséget ad saját eljárások és függvények definiálására, amelyek a 
program meghatározott részében használhatók, hasonlóan a nyelvben eleve definiált 
eljárásokhoz és függvényekhez. A C-128 BASIC mindössze egyváltozós függvények 
definiálását teszi lehetővé, s annak használatakor a megkülönböztető FN jelzést is 
használni kell. 


A használni kívánt eljárásokat és függvényeket definiálni (deklarálni) kell. Az eljárás és 
függvénydeklarációk alakja eltér egymástól. Az eljárásokat az alábbi formában kell 
megadni: 


procedure Celjárás név: (Cformális paraméter lista5 ); 
a deklarációs rész5 
c végrehajtható rész; 


A függvények definíciója ettől abban különbözik, hogy a függvény típusát is meg kell 
adni: 


function Ccfüggvény név: ( Cformális paraméter listaz):ctípusz; 
c deklarációs rész5 
c végrehajtható részz; 


A cformális paraméter listaz egymástól ;-vel elválasztott paraméter elemekből áll. Ha 
üres, a kerek zárójelekkel együtt el kell hagyni. Egy-egy ilyen elem alakja: 


(var) változó listaz: Ctípus-leírász 


ahol a változólista egymástól ,-vel elválasztott azonosítókat tartalmaz, ezek az eljárás, 
illetve a függvény ún. formális paraméterei. Ha a paraméter elem előtt a var szerepel, 
akkor a paramétereket nem érték, hanem név szerint adjuk át az eljárásnak 
(függvénynek). Ha a var nem szerepel, akkor érték szerint. A ctípus-leírász előre 
definiált típus vagy a programban már definiált típus. 


Az érték szerinti paraméter átadáskor a program az aktuális paraméter értékeit 
kiszámítja, majd átmásolja a formális paraméterekbe. Ha pl. egy 100x100-as mátrixot 
adunk át, ez 10000 értékadásnak felel meg. Ha név szerinti paraméter átadást 
alkalmazunk, a program nem hajt végre értékadást, hanem csak megmondja az 
eljárásnak, hol található a szóban forgó érték, s a továbbiakban az azon a helyen levő 
értékkel számol. A fenti esetben tehát a mátrix átmásolása elmarad. A név szerinti 
paraméter átadás a program helyfoglalását is csökkenti, hiszen a 100x100-as mátrix 
helyét nem kell az eljárásban is lefoglalni. 


A függvényeket és eljárásokat egymástól eltérően kell használni. Mindkettőt a 
cvégrehajtható rész5-ben kell meghívni. Az eljárás meghívása egy utasítás 
végrehajtásának felel meg, míg a függvény meghívását tetszőleges kifejezésben kell 
használni, hasonlóan a beépített függvényekhez. Az eljárás illetve függvényhivatkozás 
alakja a következő: 


celjárás név5(Caktuális paraméter listaz) 
cfüggvény név5 (aktuális paraméter lista) 
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Az Saktuális paraméter listaz egymástól vesszővel (,) elválasztott kifejezéseket 
tartalmaz, amelyek száma és típusa meg kell, hogy egyezzen az eljárás vagy függvény 
definíciójában szereplő formális paraméterekkel. Ha valamelyik formális paraméter név 
szerinti hivatkozást tartalmaz, akkor az annak megfelelő aktuális paraméter csak 
(ugyanolyan típusú) változó lehet. 


13.5 Típusfüggvények 

A Pascal nyelv egyik leghatékonyabb eszköze, hogy az ún. típusfüggvényekkel vagy 
típusműveletekkel további típusokat adhatunk meg. Ebben a részben röviden 
összefoglaljuk a Turbo Pascal típusfüggvényeit. Sorrendben a következőket tárgyaljuk: 


array 
record 
set 

t 
file 


array 

A Turbo Pascal - hasonlóan a legtöbb nyelvhez - lehetővé teszi tömbök kezelését. 
Eltérően azonban a legtöbbtől (különösen a FORTRAN-tól) a tömbök indexei tetszőleges 
rendezett típus elemei lehetnek. A tömböket használatuk előtt definiálni kell. A 
tömbdefiníció alakja a következő: 


array[I Cindex típus listaz] of ctípusz 


Az Cindex listaz egymástól vesszővel (,) elválasztott rendezett típusokat tartalmaz. 
Ezek vagy előre definiált típusok, vagy a programban már definiált típusok vagy ilyenek 
résztípusai. Ez utóbbi esetben annak rendezett típusnak, vagy egy rendezett típus 
résztípusnak kell lennie. A fenti formában szereplő cCtípusz-t a tömb típusának is 
nevezzük. 


Az array típusfüggvényt mind típus, mind változó definíciójában lehet használni. Ennek 
megfelelően az alábbi definíciók megegyeznek a BASIC DIM A9(10,10) utasítás 
hatásával: 


a: 
type tomb-array[0..10,0..10] of INTEGER; 
var A:tomb; 

b: 
var A:array[0..10,0..10] of INTEGER; 

e: 


type 
index-—0..10; 
tomb-array[lindex index] of INTEGER; 
var A:tomb; 
A tömbök elemeire az indexek megadásával lehet hivatkozni. A hivatkozás alakja 
Atömb név5:[cindex lista] 


ahol az indexek számban és típusban meg kell hogy egyezzenek a Ctömb név5 
deklarációjában szereplő rendezett típusokkal. A tömbök elemeire való hivatkozás bárhol 
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szerepelhat, ahol a tömb típusával azonos változó szerepelhet. Ilyen formán a tömb 
elemeinek külön-külön is lehet értéket adni. Az A[2,1] elemre AI[2][1] alakban is 
hivatkozhatunk. 


A másik legfontosabb adattípus a rekord. Hasonló a tömbhöz, azzal a lényeges 
eltéréssel, hogy a rekord elemei nem kell hogy azonos típusúak legyenek, s nem index, 
hanem név szerint kell a rekord elemeire hivatkozni. További eltérés, hogy lehetőség 
van ún. feltételes rekordok létrehozására is. A rekord típusfüggvény alakja: 


rekord Cmezőlistaz end 


A cmezőlistaz egymástól ;-vel elválasztott Cmező definíció 3-kat tartalmaz. Az egyes 
mezők vagy rögzített vagy feltételes mezők lehetnek. A rögzített mezők esetében a 
mező típusa mindig adott, míg a feltételes mező esetén egy rendezett típusú változó 
értékétől függ. Ennek megfelelően más formában kell definiálni a rögzített, illetve a 
feltételes mezőket. 


A rögzített mezőket 
cmezőnév listaz:ctípusz 


alakban kell megadni. A definíció a Cmezőnév listás-ban szereplő mezőket ctípusz 
típusúnak definiálja. A mezők sorrendje a Cmezőnév listás-ban szereplő sorrenddel 
azonos. Ezeket a neveket semmilyen más célra nem használhatjuk. A Cmezőnév listas 
elemeit vesszővel kell elválasztani. 


A feltételes mező definíció alakja a következő: 
case Cfeltételz:ctípusz of Cváltozó mezőnév listaz 


A cfeltételz tetszőleges változó. Ennek értékétől függ, hogy a rekord definíciójának 
melyik része lesz érvényes. Ctípusz a szóbanforgó változó típusa, ami csak rendezett 
típus lehet. A Cváltozó mezőnév listaz - szemben a rögzített mezőnevekkel, nemcsak 
a mező nevét és típusát, hanem azokat az értékeket is tartalmazza, amelyek esetén a 
rekordnak ez a része érvényes. Ennek megfelelően a GCváltozó mezőnév listaz 
egymástól ;-vel elválasztott Cváltozó mezőnev5 -eket tartalmaz, amelyek alakja: 
cfeltétel lista :( Cmezőlista5) 


A cdfeltétel listaz a ctípusz-ba tartozó literálokat vagy konstans azonosítókat 
tartalmaz vesszővel (,) elválasztva. 


A fenti definíció rekurziv, ugyanis a rekordon belüli CASE részek egymásba ágyazhatók. 
Ezt a gyakorlatot azonban nem javasoljuk, mert teljesen áttekinthetetlen adatstruktúrák 
jöhetnek létre. Ha a CASE-t a rekord definíciójában használjuk, az a rekord utolsó 
mezője lehet csak. Így bármely rekord-ban egyetlen feltételes mező lehet. 


Ha feltételes mezőket nem használunk, akkor a rekord alakja lényegesen 
leegyszerűsödik: 


record Crögzített mezőlistaz end 


ahol a Crögzített mezőlistaz egymástól ;-vel elválasztott rögzített mezők definíciójából 
áll. Egy ilyen definíció alakja: 
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cmezőnév listaz:ctípusz 


Ha X rekord típusú változó és név annak a rekordnak egy mezője, akkor arra a mezőre 
az X.nev alakkal tudunk hivatkozni. Ezt az alakot bárhol használhatjuk, ahol az adott 
mező típusának megfelelő változókat amúgy használhatjuk. 


A rekord definíción belül nem használhatjuk a típusfüggvényeket, így a mezők leírásakor 
használt típusok csak előzőleg már definiált típusok lehetnek. A feltételes rekordban a 
feltétel leírásaként használt típus csak rendezett (és már definiált) típus neve lehet. A 
feltételes mezők leírásában szereplő cfeltétel listaz elemei csak literálok lehetnek. 


Példaként tekintsük az alábbi rekord definíciót 


type 
konyv - record 
iro: string[30]; 
cím: string[120]; 
kiadó: string[45]; 
datum: INTEGER; 
ar: REAL 
end 


s tegyük fel, hogy a programban valahol a var miez:konyv; deklarációt használtuk. Ezt 
követően a miez.iro, miez.cím, miez.kiadó változók sztring változók a típusdeklarációban 
jelzett hosszal. A miez.datum egész, míg a miez.ar valós típusú változók. A változók 
ilyen használatára mondjuk, hogy a rekord elemeire név szerint kell hivatkozni. 


Alkalmanként egy programban fárasztó lehet kiírni folyton azt, hogy miez. Ezért a 
Pascal tartalmaz egy with utasítást, amelyik megmondja, hogy a használt mezőnevek 
elé melyik rekord típusú változó nevét kell érteni. Ennek az utasításnak az alakja: 


with crekord változó listaz do Cutasítász 


Természetesen a cCrekord változó listaz elemei közt nem lehet két azonos típusú 
változó. A lista elemeit veszővel kell elválasztani. 


A feltételes rekord használatára is adunk egy egyszerű példát: 


type 
csaladiallapot-(hajadon notlen hazas elvalt ozvegy) 
adatok- record 
nev: string[50],; 
lakcim: string[120]; 
case jelzo: csaladiallapot of 
hajadon notlen:(); 
hazas:(hazastars:string[50]); 
elvalt, 
ozvegy:(volt hazastarts:string[50];datum: INTEGER) 
end 


Tegyük fel, hogy az ujbelepo változó adatok típusú. Ebben az esetben az ujbelepo.nev, 
ujbelepo.lakcim és ujbelepo.jelzo változók értékét a rekord mindig tartalmazza. Az 
ujbelepo.hazastars csak abban az esetben tartalmaz értékes adatot, ha az ujbelepo.jelzo 
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nem hajadon vagy notlen. Az ujbelepo.datum pedig csak akkor, ha az ujbelepo.jelzo 
értéke elvalt vagy ozvegy. 


A Pascal lehetőséget biztosít halmazok kezelésére, igaz meglehetősen korlátozott 
formában. A halmazok elemei ugyanis egy rendezett halmazból kell hogy kikerüljenek, s 
ezen túlmenően a Turbo Pascal-ban egy halmaznak legfeljebb 256 eleme lehet. A 
halmaz deklaráció alakja: 


set of ctípusz; 
s mint utaltunk rá a Ctípusz csak rendezett lehet. 


A halmaz típusú változókkal lényegesen több művelet végezhető, mint a tömb vagy 
rekord típusú változókkal. Ezek közül a leglényegesebb, hogy egy halmazt megadhatunk 
elemeinek felsorolásával: 


[celem lista] 


Az celem listaz vagy a ctípus3-nak megfelelő kifejezéseket, vagy Celső5..Cutolsós 
alakú kifejezéseket tartalmaz, ahol Ccelsőz és cCutolsóz természetesen a ctípus2-ba 
tartozó elemek. Ebben az esetben az Celsőz és cCutolsóz közti összes elem 
(beleértve a határokat is) a halmazba kerül. Egész típusú halmaz megadására mutatunk 
néhány példát: 


[1,2.3,4,5] 
[1..51 

[1..4,5] 
[1..10,20..30] 


Az első három kifejezés ugyanazt a halmazt adja meg. 


Halmazműveletek 
Az aritmetikai műveletek jelentése megváltozik, ha halmazokra használjuk: 


4 két halmaz uniója; 

- két halmaz különbsége; 

két halmaz metszete; 

igaz, ha a két halmaz egyenlő; 

igaz, ha a két halmaz nem egyenlő; 

igaz, ha az első halmaz része a másodiknak; 

igaz, ha az első halmaz tartalmazza a másodikat; 
igaz, ha az első argumentum eleme a másodiknak. 


"ny 


JXAXAANK 


A Turbo Pascal lehetőséget biztosít dinamikus változók használatára is. A dinamikus 
változók a program utáni és az adatok előtti memória részben lehet elhelyezni. A 
dinamikus változók valójában véges gráfok, amelyek csúcsában statikus változók 
(tömbök, rekordok, halmazok) értékei, illetve a gráf egyéb pontjaira vonatkozó mutatók 
vannak elhelyezve. A Turbo Pascal utasításai segítségével tetszőleges gráfstruktúra 
felépíthető, bár ennek komplexitását célszerű bizonyos korlátok alatt tartani. Annál is 
inkább, mert a Turbo Pascal-nak nincs beépített szemétgyűjtési eljárása, : így a 
dinamikus memória hamar megtelhet. 


A gráfok felépítésére az ún. mutatókat használhatjuk. A mutató egy 2-byte-os szám, 
ami a memória azon helyére mutat, ahol az általa jelzett érték található. A mutatókkal 
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önmagában kevés művelet végezhető, helyette az általuk mutatott objektumokon kell a 
kívánt műveleteket elvégezni. A mutató típus definiálására nem alapszó, hanem a fel 
nyíl(t) szolgál: 


t ctípusz; 
Ha X és Y két azonos típusú mutató, akkor a következő műveleteket végezhetjük velük: 


Értékadás a: X:zY. Az X mutató értéke az Y mutató értékével lesz azonos, azaz 
elod atha e Ask JO 

mindkettő a memóriának egy és ugyanazon pontjára mutat. Így természetesen az 
általuk mutatott érték is megegyezik. 


Érték kijelölése: A mutató által kijelölt ctípusz típusú objektumra az Xt változóval 
hivatkozhatunk. A fenti értékadás következtében pl. Xtf-Yt teljesülni fog. 


Értékadás b: Xt:5Yt. Ennek hatására az Y által mutatott értéknek egy másolatát készíti el 
a program, s arra fog az X mutató mutatni. 


Egyenlőség lekérdezése: Lehetőség van két mutató egyenlőségét ellenőrizni. Mind az 
XzY, mind az XC5Y alakot használhatjuk. 


Üres mutató: Lehetőség van arra, hogy a mutató ne mutasson semmire. Erre szolgál a 
nil konstans. Az X:5snil értékadás hatására az X mutató a "semmibe" mutat. A Turbo 
Pascal a nil-t úgy valósítja meg, hogy mutató a 0000H címre mutat. A CP/M ismert 
felépítése miatt a 0000H címen nem lehet értékes adat. Lehetőség van az X-nil, illetve 
Xc 5nil relációk használatára is. 


A mutató tipusú változókat dinamikus változóknak hívjuk, mert fordításkor a rendszer 
nem foglal nekik helyet a memóriában. Ehhez a programban bizonyos speciális 
parancsokat kell kiadni. További eljárások biztosítják a már lefoglalt memória 
felszabadítását. Ezek az eljárások a következők: 


New(Cmutató5 ) 
GetMem(cmutató- , Cméret5) 
Mark( C mutató: ) 

Release( mutató: ) 
Dispose(Cmutató5) 
FreeMem( C mutatós , Cméret5) 
MemaAvail 

MaxAvail 


A New eljárás egy új mutatót hoz létre, s pontosan annyi byte-ot foglal le a 
memóriából, amennyire az általa mutatott értéknek szüksége van. A GetMem hasonlóan 
működik, de a második paraméterben megadott CIXCméret5-nyi byte-ot foglalja le a 
memóriában. A Dispose felszabadítja a mutató típusú változó által foglalt helyet. 
Ugyanez a feladata a FreeMem-nek, de hasonlóan a GetMem-hez itt is meg kell adni a 
byte-ok számát. Ennek azonosnak kell lennie a GetMem-ben szerepelt értékkel. 
Ellenkező esetben a rendszer nem tudja pontosan kezelni a dinamikus memóriát s az 
értékek egymásra íródhatnak. 


Mint említettük, a Turbo Pascal nem végez szemétgyűjtést, ami nagy mértékben 


meggyorsítja a mutatókkal végzett műveleteket, de kényelmetlen mellékhatásokkal 
járhat. Ha pl. a Dispose-zal törlünk egy 1010-es tömböt, akkor annak megfelelően lyuk 
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marad a memóriában. Ha gyakran használjuk a mutatókat, akkor a memória olyan lesz, 
mint a szita, ami végül megint csak lelassítja a rendszert és meg is telhet a memória. 


A MemaAvail függvény a dinamikus memóriában levő szabad hely nagyságát mutatja 
byte-okban. A MemaAvail az "összes" lyukat hozzászámolja a szabad területhez. A 
MaxAvail függvény a leghosszabb összefüggő memóriarész nagyságával tér vissza. 
Bizonyos esetben ez lényegesebb, mint, hogy összesen mennyi memória van. 


A Mark eljárás végrehajtása után az argumentumaként szereplő mutató a dinamikus 
memória tetejére fog mutatni, vagyis az eddig még egyáltalán nem használt 
memóriarész elejére. A Release eljárás hatására az argumentumaként szereplő mutató 
felett levő mutatók és a hozzájuk tartozó objektumok törlődnek. A Mark és a Release 
együttes használatával egy korlátozott szemétgyűjtés valósítható meg, ami általában 
elegendő. 


A ptr függvény segítségével lehetőség van a mutató által mutatott érték közvetlen 
megadására. Az addr függvény pedig közvetlenül megadja, hogy a memória melyik 
részére is mutat. 


Az alábbi két program a mutatók legegyszerűbb tulajdonságait illusztrálja: 


program pointer peldat; 


var 
p: tINTEGER; 
n:INTEGER; 

begin 
n:-111; (ín kezdőértékének beállítása) 
new(p); (a p mutató létrehozása) 
p:7nil; 
writeln(addr(pt )); (5-0, mert nil a 0000h-ra mutat) 
p:5sptr(addr(n)); í(p most az n-re mutat) 
writeln(pt ); (5111, a p által mutatott érték kiírása) 
repeat (várakozás egy billentyű) 
until keypressed; ( megnyomására) 

end. 


program pointer pelda2; 


var 
Pp: tINTEGER; 
n:INTEGER absolute $a000; (n deklarálása a $a000 címre) 
begin 
new(p); (a p mutató létrehozása) 
p:5ptr($a000); (a p a $a000 címre, azaz n-re mutat) 
n:5123; ín értékének beállítása) 
writeln(pt ); (123, a p által mutatott érték kiíratása) 
repeat (várakozás egy billentyű) 
until keypressed; (megnyomására) 
end. 
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A Turbo Pascal a Standard Pascal-tól gyökeresen eltérő módon kezeli a file típust. A 
Turbo-ban a file típus megadása egyszerű: 


file of Ctípusz; 


A ctípust5 a file típus alaptípusának hívjuk. A file típusú változókkal pontosan azok a 
műveletek végezhetők el, amik alaptípusú változókkal, két lényeges eltéréssel: 


s a file változókhoz konkrét lemezes file-ok rendelhetők; 


s lehetőség van a file változó tartalmát a hozzá rendelt lemezes file meghatározott 
helyére kiírni, illetve onnan visszaolvasni. 
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13.6 Programstruktúrák 


Ebben a részben ismertetjük a a Turbo Pascal programokban használható (struktúrált) 
utasításokat. A Cvégrehajtható rész5: egyetlen ilyen utasításból áll. 


Üres utasítás A Turbo Pascal az utasítások elválasztására a pontosvesszőt (;) használja. 
Két egymás utáni, vagy egy felesleges pontosvesszőt ezért a fordító üres utasításnak 
tekint. Célszerű azonban ennek használatát elkerülni, mert alkalmanként rosszul 
struktúrált programokat eredményezhet. 


Címkés utasítás A Turbo Pascal lehetőséget nyújt címkék használatára is. A címkét az 
utasítástól kettősponttal (:) keli elvátasztani. Az utasítás alakja tehát: 


Sccímkez:cutasítász 

Értékadó utasítás Az értékadó utasítás alakja: 

c struktúrált változó 3 :5 ckifejezés 7 

A Sstruktúrált változóz vagy egyszerű változó, vagy tömbváltozó vagy rekord 
komponens vagy mutató. A kifejezés típusának meg kell egyeznie a struktúrált változó 
típusával. A kifejezés a Turbo Pascal beépített műveleteiből, vagy: már definiált 
(deklarált) függvényekből épülhet fel. 

Eljáráshívás Az eljáráshívás alakja: 

s eljárásnév5 ( Caktuális paraméter lista: ) 

Az Seljárás név: a Turbo Pascal előre definiált eljárásainak egyike lehet, vagy a 
programban már szereplő eljárás kell hogy legyen. Az aktuális paraméterek számban és 
típusban meg kell hogy egyezzenek az eljárás deklarációjában szereplő formális 
paraméterekkel. Ha valamelyik formális paraméter név szerinti hivatkozás, akkor a neki 


megfelelő aktuális paraméter csak egyszerű változó lehet. 


Összetett utasítás Lehetőség van több utasítás összevonására utasítászárójelek 
használatával. Az utasítás alakja: 


begin Cutasítássorozat: end 


Az Sutasítássorozats egymástól pontosvesszővel elválasztott utasításokat tartalmaz. 
Az utasítások a leírás sorrendjében hajtódnak végre. 


Ugró utasítás A Pascal egyetlen nem struktúrált utasítást tartalmaz. Ennek alakja GOTO 
Sccímke5 alakú, ahol a Ccímkes a programban már deklarált címke kell hogy legyen. 
A program a Ccímkes címkével ellátott utasítással fog folytatódni. Struktúrált utasítás 
belsejébe be-, vagy onnan kilépni a GOTO utasítással tilos! 

Feltételes utasítások A feltételes utasítás alakja: 

IF ckifejezész THEN cutasítász (ELSE cutasítász) 


Az utasítás alakjából is látszik, hogy abban az esetben, ha a THEN vagy ELSE rész több 
utasításból áll, akkor azt utasítászárójelekkel (begin,end) kell zárni! 
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A Turbo egy másik feltételes utasítást is tartalmaz, amelyik lehetővé tesz többirányú 
programelágazást is. Ennek alakja a következő: 


CASE ckifejezész OF Ceset-utasítás listaz (ELSE cutasítássorozats) END 


A dSeset-utasítás listaz egymástól pontosvesszővel (;) elválasztott eset-utasításokat 
tartalmaz. Egy eset-utasítás alakja: 


Seset-listaz: Cutasítász; 


ahol az dcCeset-listaz egymástól vesszővel (, elválasztott literálokat tartalmaz. A 
program kiértékeli a kifejezés értékét, majd megkeresi az első literált, amelyik ezzel 
egyenlő, s az annak megfelelő utasítást hajtja végre. Ha nem talál ilyent, akkor az ELSE 
ág kerül végrehajtásra (ha van). Abban az esetben, amikor az eset-utasítás maga is 
több utasításból áll, akkor utasítás zárójelek közé kell tenni. Ez az ELSE részre nem 
vonatkozik. 


Ciklus utasítások A Turbo Pascal háromféle ciklust ismer. Ezek sorra a következők: 
s 
A/ I To 
FOR cváltozós:- ckezdőérték5 ( Svégértéks DO cxutasítász 
(DOwNTO 
B/ / 
REPEAT cutasítássorozats UNTIL ckifejezész 
C/ 
WHILE ckifejezész DO cutasítász 


Az A/ struktúrált utasítás gyakorlatilag azonos a BASIC FOR ciklusával, mig a B/ és C/ a 
C-128 BASIC DO...LOOP ciklusának felel meg. 


A FOR ciklusban a Cváltozós tetszőleges rendezett típusú változó lehet. Szemben 
tehát a legtöbb Commodore BASIC-kel, nem lehet valós! A cCkezdőértéks és 
I végérték5 ugyanilyen tipusú kifejezések, amelyek értéke egyszer kerül kiszámításra. A 
ciklusváltozó felveszi a kezdőértéket, majd ezzel lefut a DO után álló utasítás (a 
ciklusmag). A ciklusváltozó értéke - a rendezett típusnak megfelelően - eggyel megnő, 
vagy csökken. Ez attól függ, hogy a TO (felfelé) vagy a DOWNTO (lefelé) alapszót 
használtuk. A ciklus még a végértékkel is lefut. A BASIC-kel ellentétben, ha a 
kezdőérték már eleve meghaladta a végértéket, a ciklus egyetlen egyszer sem fut le. 


A WHILE ciklus mindaddig fut, amig a Ckifejezész igaz. Ha a ckifejezész-t a rendszer 
hamisnak találta, akkor az Cutasítász már nem kerül végrehajtásra. A WHILE-ban nincs 
ciklusváltozó. Ha ilyenre mégis szükség van. akkor azt a WHILE utasítás előtt kell 
beállítani, s a ciklusmagban módosítani 


A REPEAT ciklusban levő dCutasítássorozats utasításait pontosvesszővel (;) kell 
elválasztani egymástól. A ciklus addig ismétlődik, míg a cCkifejezész hamis. Amikor 
először igazzá válik, a ciklus lejár. Szemben a WHILE-lal, a REPEAT ciklusmagja legalább 
egyszer lefut. A REPEAT - hasonlóan a WHILE-hoz - nem tartalmaz ciklusváltozót, azt 
magunknak kell beállítani, illetve módosítani. 


Gépi kódú programrész beillesztése A Turbo Pascal fordítóprogram gyorsaságát - túl 


azon, hogy zseniális programozók készítették - két dolognak köszönheti. Az egyikről 
már szóltunk: típusos nyelv, s ráadásul nem tartalmaz szemétgyűjtési eljárást. A másik, 


425 


Turbo Pascal fi Commodore 128 


hogy nem a hagyományos fordítók elvén működik, a fordítást nem követi egy 
szerkesztési fázis. Ennek egyik következménye, hogy nem lehet gépi kódú rutinokat a 
programhoz hozzászerkeszteni. Ezen a rendszer úgy segít, hogy viszont a program 
szövegébe gépi kódú rutinok építhetők be. Erre szolgál az inline utasítás, amelyiket egy 
lista követ. A lista minden eleme a gépi kódú rutin egy byte-ja. Ezt a byte-ot a 
következő kifejezésekkel adhatjuk meg: 


Kifejezés Jelentés 

zelőjel nélküli egészz közvetlenül megadja a byte-ot 

ckonstans azonosító közvetlenül megadja a byte-ot 

Sváltozós a program a változó címét a rutin hívása előtt ide másolja 

x a processzor utasításszámlálója (ahová a gépi kódu prog- 
ram kerül) 

x Celőjel 5 cliterál: a processzor utasításszámlálójának megfelelően módosított 


értéke (az Celőjelsz t vagy - lehet) 


(Emlékeztetünk rá, hogy a cliterálz vagy esetleg előjeles Ckonstans azonosítós vagy 
előjeles szám vagy konstans sztring.) 


Az inline utasítás alakja: 
INLINE ( Cbyte sorozat: ); 


ahol a Cbyte sorozat: elemei a fenti táblázatban szereplő elemek lehetnek a törtjellel 
(/) elválasztva. A fordító ebből egy gépi kódú rutint készít. Ennek meghívása előtt a 
változóként megadott elemek értékét behelyettesíti, majd meghívja a rutint. 
Visszatéréskor nincs paraméter átadás. Ha erre szükség van, akkor valamelyik statikus 
változót célszerű erre felhasználni. Ennek kezdőcime az addr előre definiált függvénnyel 
átadható a gépi kódú alprogramnak. 


Hosszabb betéteket célszerű valamelyik makro assemblerrel megírni, majd a már 
letesztelt programot hexadecimális alakban kilistázni, s utána beírni a programba. 
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13.7 Előre definiált eljárások és függvények 


Ebben a részben felsoroljuk a Pascal 3.1-es verziójában használható előre definiált 
változókat, eljárásokat és függvényeket funkció szerinti csoportosításban. Közös 
jellemzőjük, hogy átdefiniálhatók, de azt követően az eredetileg definiáltak már nem 
használhatók. 


Előre definiált változók 


Szöveg file-ok 


Aux RS232-es csatorna 

Con CP/M konzol egység 
Input standard input periféria 
Kbd CP/M konzol input egység 
Lst CP/M listázó periféria 
Output standard output periféria 
Trm CP/M konzol egység 


A Con és Kbd input esetén eltérő hatású. A Con használatakor a program egy 
teljes sort olvas be, amit előzetesen még meg is szerkeszthetünk. Ha az input 
pufferben még voltak karakterek, az elvész. A Con használatakor a beirt karakterek 
automatikusan visszaíródnak a képernyőre. A Kbd egyszerre egyetlen karaktert 
olvas, s az nem íródik automatikusan vissza a képernyőre. 


Az AUX: CP/M eszköz a C128-as CP/M-ben nincs installálva, használata ekvivalens 
a NULL: eszköz használatával. 


Mem(] 
array[$0000..$FFFF)] of byte; a processzor memória területe 


BufLen 
integer; a READ utasítás pufferének a hossza 


HeapPtr 
mutató; a dinamikusan allokálható memória tetejére mutat 


RecurPtr 
mutató; a rekurzió verem tetejére 


StackPtr 
mutató; a verem mutatója 


Képernyő és billentyűzet kezelés 


ClrEol 
eljárás: törlés a kurzortól a sor végéig 


CirScr 
eljárás: a képernyő teljes törlése 


CrtExit 
eljárás: a képernyőre a termináló sztringsorozat elküldése 
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Crtlnit 
eljárás: a képernyőre az inicializáló jelsorozat elküldése 


DelLine 
eljárás: a kurzor sorának törlése 


GOTOXY(x,y:integer) I 
eljárás: a kurzor az x. sor y. oszlopába kerül 


HighVideo 
eljárás: a következő kijelzések nagy intenzitással jelennek meg 


InsLine 
eljárás: beszúrás a kurzor helyén 


lOresult 
függvény: az IO hiba kódjával tér vissza 


KeyPressed 
függvény: TRUE-val tér vissza, ha van karakter az input pufferban 


LowVideo 
eljárás: a következő kiírások alacsony intenzitással történnek 


NormVideo eljárás: hatása azonos a HighVideo-val 


File-kezelő utasítások 


Assignf(f:fileznev:string) 
Az f file típusú változóhoz a nev karaktersorozatot rendeli. A nev" nevű file-ra 
ezek után az f változóval lehet hivatkozni. 


BlockReadff:file;var;db:integer) 

BlockReadff:file;var;db.,kod:integer) 
eljárás: az f - előzőleg már megnyitott file-ból beolvassa a következő db darab 
128byte-os blokkot és a memóriába helyezi Addr(var)-tól kezdve. A var változó 
típusa érdektelen. Ha a kod egész változót is megadjuk, akkor a kod értékébe 
visszatéréskor a ténylegesen beolvasott rekordok száma kerül. 


BlockWriteff:file;var;db:integer) 

BlockWriteff:file;var; db.,kod:integer) 
eljárás: az f - előzőleg már megnyitott file-ba kiírja az Addr(var)-tól kezdődő 
pufferból a következő db darab 128byte-os blokkot. A var változó típusa 
érdektelen. Ha a kod egész változót is megadjuk, akkor a kod értékébe 
visszatéréskor a ténylegesen kiírt rekordok száma kerül 


Chainff:file) 
eljárás: betölti és lefuttatja a .CHN kiterjedésű, az f file típusú változóval 
azonosított, a Turbo Pascal CHN opciójával fordított programot 


Closeff:file) 
eljárás: lezárja az f file típusú változóhoz tartozó file-t. 
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Eofff:file) 
függvény: TRUE-val tér vissza, ha a file végét elértük. 


EoLní(f:text) 
függvény: TRUE-val tér vissza, ha a szöveges file sorát már végigolvastuk. 


Eraseff:file) 
eljárás: törli az f file változóval megadott file-t a lemezről. 


Executeff:file) 
eljárás: betölti és lefuttatja az f file változóval azonosított COM kiterjesztésű file-t. 


FilePosff:file) 
egész függvény: a file író/olvasó fejének pozíciójával tér vissza. A következő 
író/olvasó utasítás ennél a pozíciónál kezdődik. Szöveges file-re nem ad jó 
értéket. 


Read([(f:file Jvar1[/var2...]) 
eljárás: hatására az f file-ról vagy eszközről (hiányában az Input nevű standard 
beviteli perifériáról) olvas be adatokat a program, s azokat sorban a var1, var2 stb. 
változókhoz rendeli. 


ReadtLn(ff:text Jvar1[/var2...]) 
eljárás: hatására az f file-ról (hiányában az Input nevű standard beviteli 
perifériáról) olvas be adatokat a program, s azokat sorban a var1, var2 stb. 
változókhoz rendeli. 


Renameff:file,ujnev:string) 
eljárás: hatására az f file új neve az "ujnev" sztringváltozó pillanatnyi tartalma lesz. 


Resset(f:file) 
eljárás: létező file megnyitása. 


Re write(f:file) 
eljárás: új file létrehozása és megnyitása. Ha az adott file már létezik, akkor a 
parancs 0 hosszúságúra csonkolja. 


Seekff:file;pos:integer) 
eljárás: az adott file író/olvasó fejét az n-ik rekordra állítja. A következő író/olvasó 
művelet innen kezdődik. Szöveges file-ra nem jól működik. 


write([f:file Jvar1[/var2...]) 
eljárás: hatására az f file-ba vagy eszközre (hiányában az Output nevű standard 
kiviteli perifériára) írja ki a var1, var2 stb. változókhoz rendelt adatokat. 


Write([(f:text Jvar1[/var2...)]) 
eljárás: hatására az f file-ba vagy eszközre (hiányában az Output nevű standard 
kiviteli perifériára) írja ki a vari, var2 stb. változókhoz rendelt adatokat. Ezután 
még elküld egy kocsivissza/soremelés karaktersorozatot is. Csak szöveges file-ra 
használható. 
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Egyéb utasítások 


Addr(var) 
egész függvény: a var tetszőleges típusú változó címével tér vissza. 


FililChar(mem,db:integer;ch:char) 
eljárás: a mem memóriacímtől kezdve db darab byte-ot tölt fel a ch karakterek. A 
ch típusa byte is lehet. 


Hi(v:integer) 
byte függvény: a v egész típusú változó felső byte-jával tér vissza. 


Lo(v:integer) 
byte függvény: a v egész típusú változó alsó byte-jával tér vissza. 


Move(límem 1 mem2.db:integer) 


eljárás: a mem1 címtől kezdődően db darab byte-ot másol át a mem2 cimtől 
elhelyezve. 


SizeOf(var) 


egész függvény: tetszőleges típusú változó által foglalt byte-ok számával tér 
vissza. 


Swap(v:integer) 
egész függvény: megcseréli a v változó alsó és felső byte-ját, s az úgy kapott 
értékkel tér vissza. Pl. Swap($ABEF)-$EFAB. 


Az operációs rendszer funkcióinak használata 


Bdos(fk:integert:Creg:integer]) 
eljárás: az fk-ik Bdos funkció meghívása. A rutin meghívása előtt az opcionális 
második paramétert a C regiszterbe tölti a program. 


Bdos(fk:integer[;Creg:integer]) 
függvény: az fk-ik Bdos funkció meghívása. A rutin meghívása előtt az opcionális 
második paramétert a C regiszterbe tölti a program. A BDOS funkció után az A 
regiszter tartalmával tér vissza. 


BdosHLffk:integer[;Creg:integer])) 
függvény: az fk-ik Bdos funkció meghívása. A rutin meghívása előtt az opcionális 


második paramétert a C regiszterbe tölti a program. A BDOS funkció után a HL 
regiszter tartalmával tér vissza. 


Egyebek 


Delay(t:integer) 
eljárás: a program futását t ezredmásodpercre felfüggeszti. 


Halt 
eljárás: a program megáll. 
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absolute 
deklaráció: a változó tárolására szolgáló cím, konstansként megadható. Használata: 
cIcnév53:ctípusz absolute Ccím5. 


forward 
deklaráció: az eljárás törzsét helyettesíti. Különösen akkor használható, ha az .INC 
file-ban olyan eljárást írunk, amelyik az .INC-et tartalmazó file-ban lesz majd 
deklarálva. 
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13.8 Fordítási opciók 


A Turbo Pascal programokba lehetőség van úgynevezett fordítási opciók beillesztésére, 
amelyek a fordítás menetét vezérlik, s nem részei az igazi programnak. A Turbo-ban a 
fordítási opciókat kapcsos zárójelek közé kell tenni s mindig egy $ jellel bevezetni: 
($...3- A kapcsos zárójelek a megjegyzéseket tartalmazzák. Ha a megjegyzés egy $ jellel 
kezdődik, a fordító azt fordítási opciónak értelmezi, s végrehajtja. Megjegyzéseket a (x, 
illetve x) jelek közé is lehet tenni. Ebben az esetben azonban a fordító nem hajtja végre 
az esetleg itt elhelyezett vezérlő karaktereket! A kapcsos zárójelek a CCTRL-[5, illetve 
SAaCTRL-]5 billentyűzéssel állíthatók elő. A 40 oszlopos képernyőn két grafikus jel 
látható, a 80 oszlopos képernyőn azonban igazi kapcsos zárójelek. 


Egy kapcsosszárójel párban több fordítási opciót is megadhatunk. A $ jelet csak 
egyszer kell szerepeltetni, s az opciókat vesszővel kel! elválasztani egymástól: ($1- V-). 
A $ jel után nem lehet szóköz. Az egyes opciók a következők lehetnek: 


Bt I/O mód kiválasztása Kezdeti érték: B-t 

A B fordítási opció a használt konzolt adja meg. A Bt opció esetén a standard INPUT és 
OUTPUT utasítások a CON: logikai eszközre vonatkoznak. Ellenkező (B-) esetben pedig a 
TRM: logikai eszközre. 


Ci  -CCTRL-SZ és cCCTRL-C5 Kezdeti érték: Ct 

A C opció engedélyezilletiltja a ki/beviteli utasítások megszakítását a CCTRL-C5, 
illetve a CXCTRL-S5Z (-cxNO SCROLL5) billentyűkkel. Ha engedélyezzük, akkor az I/O 
műveleteket a  CCTRL-C53 megszakítja, s a  CCTRL-Sz megállítja/újraindítja a 
képernyőre történő írást. A Cr opció engedélyezi ezen billentyűk használatát. 


1-t I/O hibakezelés Kezdeti érték: I-t 

Saját I/O hibakezelést az 1- opcióval engedélyezhetünk. Ekkor I/O hiba esetén a 
program fut tovább, s az IOResult függvény segítségével lekérdezhetjük, milyen hiba 
történt. Az I4- opció használata esetén I/O hiba esetén a program futása félbeszakad. 


! cfilenév: szöveg beillesztése 
Az opció lehetőséget biztosít a programok könyvtárszerű kezelésére. A cfilenév5 nevű 
szöveges file-t a fordító úgy tekinti, mintha a program része lenne, s teljes egészében 
belefordítja a programba. A fordítási opció nem ágyazható önmagába, azaz a cfilenév5 
nevű program nem tartalmazhat további I cfilenév15 alakú opciót. 
A dcfilenév: után egy szóköznek kell állnia, különben a fordító nem tudja a file nevét 
helyesen értelmezni: 

(Itipus.inc ) 

(Irutin12.inc Cr) 


A könyvtári programoknak általában az INC típust szokás adni, ezzel is jelezve, hogy 
csak egy nagyobb program részeiként értelmezhetők. Ha az opcióban nem adjuk meg a 
file-név kiterjesztését, akkor azt a fordító automatikusan PAS-nak tekinti. 


Rt — index ellenőrzés Kezdeti érték: R- 
A R opcióval a programba fordíthátjuk azt a rutint, amelyik ellenőrzi, hogy a tömbök 
indexei a megfelelő határok közé esnek-e. Ez a rutin ellenőrzi azt is, hogy a résztípusok 
értékei a megengedett határok között mozognak-e. Elsősorban a program fejlesztéskor 
célszerű használni, lényegesen lassítja a program futását. 
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V-t — sztringhossz ellenőrzés Kezdeti érték: V-t , 

Az opció segítségével be/ki kapcsolhatjuk a sztringhossz ellenőrzését. Erre akkor kerül 
sor, ha egy eljárásnak vagy függvénynek név szerint (var-ral) adunk át egy sztring 
paramétert. A Vt opció használatakor csak akkor nem kapunk hibajelet, ha a formális és 
aktuális paraméter sztring lehetséges maximális hossza megegyezik. (Ez az a hossz, 
amit a két paraméter deklarálásakor megadtunk.) 


Ut  ACCTRL-C5 engedélyezése Kezdeti érték: U- 

Az opció engedélyezi/letiltja a CCTRL-C5 tetszőleges pillanatban történő használatát. 
A C opcióval szemben ez az opció bármikor engedélyezheti a program futásának 
megszakítását. Elsősorban a tesztelési munka közben célszerű engedélyezni. Ez ugyanis 
az egyetlen lehetőség, hogy egy végtelen ciklusból - a rendszer újratöltése nélkül - ki 
lehessen lépni. 


At — abszolut kód Kezdeti érték: At 

Az opció lehetővé teszi rekurziv eljárások tiltását és engedélyezését. Az At opció 
abszolút kódot generál, az így fordított eljárások, függvénvek rekurzivan nem 
használhatók. A rekurzív eljárások előtt az A- opciót kell használni. Az eljárás végén 
újra visszatérhetünk abszolút kódra az At opcióval. Ez csökkenti a program méretét. 


Wn WITH mélysége Kezdeti érték: W2 

Az opció az egymásba ágyazott DO utasítások mélységét adja meg. n előjel nélküli 
szám, maximum 9 lehet. Ha a W opcióban megadottnál több with utasítást skatulyázunk 
egymásba, akkor hibaüzenetet kapunk. 


Xt — Tömb optimalizálás Kezdeti érték: Xt 

A fordító optimalizálja a tömbök elhelyezkedését és elérésüket. Ez meghosszabbítja a 
fordítási időt, s valamivel a lefordított programot is. Az opció az X- használatával 
kikapcsolható. 


13.9 Turbo Pascal hibaüzenetek 

Fordítási hibák 

Az alábbiakban felsoroljuk a fordítás közben kapható hibajelzéseket. Ha a Turbo Pascal 
indításakor a hibaüzenetek szövegét is betöltöttük, akkor a számok után a hiba szövege 
is kiíródik. Az cESC5 billentyű megnyomása után visszatérhetünk a programszerkesz- 


tőbe s a kurzor a hiba helyén jelenik meg. 


01 7 expected 
A fordító "; helyett más jelet talált. 


02 "7 expected 
A fordító ":" helyett más jelet talált. 


03 "/, expected 
A fordító ", helyett más jelet talált. 


04 (" expected 
A fordító (" helyett más jelet talált. 


05 ) expected 
A fordító ") helyett más jelet talált. 
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06 "—" expected 
A fordító "—" helyett más jelet talált. 


07 ":-" expected 
A fordító ":5" helyett más jelet talált. 


08 T expected 
A fordító ] helyett más jelet talált. 


09 T expected 
A fordító " helyett más jelet talált. 


10 "." expected 
A fordító ". helyett más jelet talált. 


11 ".. expected 
A fordító ".. helyett más jelet talált. 


12 BEGIN expected 
A fordító BEGIN helyett más jelet talált. 


13 DO expected 
A fordító DO helyett más jelet talált. 


14 END expected 
A fordító END helyett más jelet talált. 


15 OF expected 
A fordító OF helyett más jelet talált. 


17 THEN expected 
A fordító THEN helyett más jelet talált. 


18 TO or DOWNTO expected 
A fordító TO vagy DOWNTO helyett más jelet talált. 


20 Boolean expression expected 
A fordító logikai kifejezés helyett valami mást talált. 


21 File variable expected 
Az adott helyen csak file típusú változót lehet használni. 


22 Integer constant expected 


Az adott helyen csak egész típusú konstanst lehet használni. 


23 Integer expression expected 
Az adott helyen csak egész kifejezés használható. 


24 Integer variable expected 
Az adott helyen csak egész változó használható. 


25 Integer or real constant expected 


Egész vagy valós típusú konstans helyett valami mást talált a rendszer. 


434 


Commodore 128 Turbo Pascal 


26 Integer or real expression expected 
Egész vagy valós típusú kifejezés helyett valami mást talált a rendszer. 


27 Integer or real variable expected 
Egész vagy valós típusú változó helyett valami mást talált a rendszer. 


28 Pointer variable expected 
Ezen a helyen csak mutató használható. 


29 Record variable expected 
Ezen a helyen csak record típusú változó használható. 


30 Simple type expected 
Csak rendezett típus vagy típus azonosító használható ezen a helyen. 


31 Simple expression expected 
A kifejezés nem tartalmazhat zárójelet. 


32 String constant expected 
Ezen a helyen egy sztring literálnak kell állnia. 


33 String expression expected 
A fordító, ezen a helyen sztring kifejezést várt, de valami mást talált. 


34 String variable expected 
Sztring változó helyett valami mást talált a rendszer. 


35 Textfile expected 
Ezen a helyen csak textfile használható. 


36 Type Identifier expected 
Ezen a helyen csak típus azonosító használható. 


37 Untyped file expected 
Ezen a helyen csak típus nélküli file használható. 


40 Undefined label 
Olyan címkét használtunk, ami nem volt label utasítással definiálva. 


41 Unknown identifier or syntax error 
Ismeretlen azonosítót használtunk, de lehet, hogy csak rosszul írtuk le a programot. 


42 Undefined pointer type in preceding type definitions 
A mutató alaptípusát nem definiáltuk sehol. 


43 Duplicate identifier or label 
Kétszer definiáltunk eg azonosítót vagy címkét. 


44 Type mismatch 
Az adott helyen nem megengedett típust használtunk. 


45 Constant out of range 
A konstans kívül esik az értékhatárokon. 
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46 Constant and CASE selector type does not match 
A konstans és a CASE-ben megadott típus nem egyezik. 


47 Operator type(s) does not match operator 
Az argumentumok típusa nem felel meg a használt műveletnek. 


48 Invalid result type 
Az eredmény nem megfelelő tipusú. 


49 Invalid string length 
Nem megengedett hosszúságú sztring. 


50 String constant length does not match type 
A használt sztring literál túl hosszú. 


51 Invalid subrange base type 
A résztípus képzést csak rendezett típusra lehet használni, másra kíséreltük meg. 


52 Lower bound 5 upper bound 
A résztípus definíciójában a kezdeti érték nagyobb mint a végérték. 


53 Reserved word 
Alapszót akartunk újra definiálni. 


54 Illegal assignment 
Nem megengedett értékadás, pl. konstans változóra. 


55 String constant exceeds line 
A Turbo Pascal egy esetben érzékeny a sor végére: a sztring konstans nem nyúlhat túl 
rajta. A fordító ilyent talált. 


56 Error in integer constant 
Az egész konstans kiértékelése közben hiba történt, pl. nem megengedett karaktert 
használtunk. 


57 Error in real constant 
A valós konstans kiértékelése közben hiba történt, pl. nem megengedett karaktert 
használtunk. 


58 illegal character in identifier 
Azonosítóban vagy címkében nem megengedett karaktert használtunk. 


60 Constants are not allowed here 
Ezen a helyen nem lehet konstanst használni. 


61 Files and pointers are not allowed here 
A programban ezen a helyen file-t vagy mutatót használtunk, holott nem lehet. 


62 Structured variables are not allowed here 
Struktúrált változót nem használhatunk ezen a helyen. 


63 Textfiles are not allowed here 
Ezen a helyen nem használhatunk textfile-t. 
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64 Textfiles and untyped files are not allowed here 
Ezen a helyen nem használhatunk textfile-t és típus nélküli file-t. 


65 Untyped files are not allowed here 
Ezen a helyen nem használhatunk típus nélküli file-t. 


66 I/O not allowed here 
I/O művelet ezen a helyen (vagy módon) nem végezhető. 


67 Files must be VAR parameters 
Eljárások és függvények formális paraméterlistáiban a file típusú változókat csak név 
szerint (var) használhatjuk. 


68 File components may not be files 
A file alaptípusa nem tartalmazhat file-t. 


69 Invalid ordering of fields 
A mezők sorrendje nem megfelelő. 


70 Set base type out of range 
A set típus alaphalmaza kívül esik a lehetséges tartomány nagyságon (256). 


71 Invalid GOTO 
A GOTO utasítás ebben a formában nem használható. (GOTO-val nem léphetünk bele 
egy struktúrába.) 


72 Label not within current block 
A címke nincs a feldolgozás alatt álló program blokkban. 


73 Unidentified FORWARD procedure(s) 
A FORWARD-dal definiált eljárás(ok) definíciója hiányzik. 


74 INLINE error 
Az INLINE utasítás elemei közt hibás van. 


75 Illegal use of ABSOLUTE 
Az ABSOLUTE utasítást meg nem engedett helyen használtuk. (Pl. név szerinti 
hivatkozásnál.) 


90 File not found 
Az I fordítási opcióban megadott file nincs a lemezen. 


91 Unexpected end Oof source 
A tárgyprogram véget ért, holott a fordító még nem találta meg a programstruktúra 
végét. 


97 Too many nested WITHSs 
A Wn opcióban megadott értéknél több WITH utasítást ágyaztunk egymásba. 


98 Memory overfiow 
A program nem fér el a memóriában. 
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99 Compiler overflow 
A fordító — munkaterülete — megtelt. Csökkenteni kell az egymásba ágyazott 
programstruktúrák számát s egyszerűsíteni a programot. 


Futási hibák 


01 Filoating point overflow 
Valós típusú műveletek közben túlcsordulás történt. 


02 Division by zero attempted 
0-val kíséreltünk meg osztani. 


03 Sart argument error 
Négyzetgyököt negatív számból nem lehet vonni. 


04 Ln argument error 
A logaritmusfüggvény argumentuma csak pozitív szám lehet. 


10 String length error 
Valamelyik sztring művelet eredménye túl nagy sztringet eredményezett. 


11 Invalid string index 
A sztring indexe túlmutat a sztring hosszán. 


90 Index out of range 
Az index, amit használtunk kívül van a megengedett értékeken. 


91 Scalar or subrange out of range 
A rendezett- vagy résztípus típusú változó értéke a megengedett értékhatárokon kívül 
esik. 


92 Out of integer range 
Az egész kifejezés értéke már nem esik a gépben ábrázolható értékhatárok közé. 


FO Overlay file not found 
Az átlapoláshoz szükséges file-t a rendszer nem tudja betölteni. 
I/O hibák 


01 File does not exist 
A használni kívánt file nem létezik. 


02 File not open for input 
A file input műveletekre nem használható. 


03 File not open for output 
A file output műveletekre nem használható. 


04 File not open 
A használni kívánt file-t még nem nyitottuk meg. 
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10 Error in numeric format 
A write eljárásban használt formátum leírás nem megfelelő. 


20 Operation not allowed on a logical device 
A végrehajtandó művelet logikai eszközre nem alkalmazható. 


21 Not allowed in direct mode 
Direkt módon nem alkalmazható. 


22 Assign to std files not allowed 
Az assign eljárás a standard INPUT és OUTPUT file-ra nem alkalmazható. 


90 Record length mismatch 
Egy létező file rekord hossza nem azonos a programban megadottal. 


99 Unexpected end-of-file 


Az utolsó rekord beolvasása közben elérte a rendszer a file végét. 


(logikailag vagy fizikailag) sérült a file. 


FO Disk write error 
Lemez írási hiba. Valószínüleg a lemez vagy lemezegység fizikai hibája. 


F1 Directory is full 
A lemez katalógusa megtelt. 


F2 File size overfilow 
Túl sok rekord. 


F3 Too many open files 
Az adott számú lemezes file nem nyitható meg. 


FF File disappeared 


Turbo Pascal 


Valószínüleg 


Egy előzőleg már sikerrel megnyitott file nincs a lemezen. Lehet, hogy a lemezt közben 


kicseréltük. 
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14. fejezet 


Turbo Pascal példaprogramok 


Ebben a fejezetben Turbo Pascal példaprogramokat adunk. Egyes példák olyanok, hogy 
bármilyen gépen futó Turbo Pascal-ban jól működnek, mások csak CP/M-es Turbo 
Pascalban, megint mások csak a Commodore 128-on. 


FACTOR 

A program az n szám faktoriálisát, n!-t számítja ki. n! - n x (n-1) x... k 3 x 2 x 1. Az 
n! érték kiszámítására egy while ciklusban kerül sor. Ha n-0O értéket adunk be, a 
program megáll. 


RFACTOR 
Az előbbi feladatot oldja meg, azonban rekurzív eljáráshívással. A használt képlet: n51 
esetén n! — n x (n-1)!. 


OUEENS 

A program 8 királynőt állít fel a sakktáblán, anélkül, hogy ütnék egymást. A 
végeredmény az A, B stb. oszlopokban való pozícióját jelzi a királynőknek. Az 15863724 
sorozat ezért az A1, B5, C8, D6, E3, F7, G2, M4 felállásnak felel meg. 


HANOI 

A program a Hanoi tornyai néven ismert játék megoldását mutatja be. Induláskor az 
első pálcán levő korongok számát kell megadni. A megoldáshoz ez a program is 
rekurzív eljárásokat használ. 


STACK 

A program azt mutatja be, hogy hogyan lehet mutatók segítségével vermet szervezni. A 
deklarált eljárások a verem kreálását (CREATE), a verembe való tételt (PUSH), a 
veremből való kivételt (POP), s a verem üres voltának ellenőrzését (IS EMPTY) 
szolgálják. A főprogram ezek egyszerű használatát adja: az általunk megadott számig a 
verembe rakja az egész számokat, majd visszaolvassa azokat. 


CPMDIR 


A program a lemez katalógusában szereplő neveket írja ki a képernyőre. A program jól 
mutatja, hogyan kell Turbo Pascalból a BDOS funkciókat felhasználni. 


GRAPHIC 

A program a 80 oszlopos képernyő grafikai lehetőségeit mutatja be. A program két INC 
file-t tartalmaz. Ezek szerepe, hogy a rendszerhez tartozó gépi kódú rutinokat a $E000 
címtől betöltse. 
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Ehhez a szükséges gépi kódú programot - amit a 10. fejezetben adtunk meg, a MAC 
makro assemblerrel le kell fordítani. Az így kapott GRAPHIC.HEX file-t az INSTALL.INC 
program tudja a memóriába tölteni. A GRAPHIC.INC tartalmazza a gépi kódú rutinok 
Turbo Pascalbeli EXTERNAL definícióit is, s ez a programrész hívja meg a INSTALL 
CODE eljárást is. 


Maga a GRAPHIC.PAS program tartalmazza még a CirScr80 eljárás definícióját, ami törli 
a 80 oszlopos grafikus képernyőt. 


A főprogram egy egyszerű ábrát rajzol a 80 oszlopos képernyőre. (Ha két monitort 
használunk a rendszerben, vagy egyet, de az átkapcsolható, akkor a 40 oszlopost 
használjuk a rendszer és a Turbo számára, a 80 oszloposon csak rajzoljunk!) 


program factor; 


( szsmezzszzzzszzmesszzsezszzzszzzszeszszezszszsz 


var n.m,s: integer; 
label ismetles; 


( szszzzzzzzemuzzzzzzzzzzzzzzzz) 
begin (factor) 


readln(n); 
ismetles: m:5n; s:5-n; 
while n51 do 
begin 
n:5n-1T; 
m:sm"n 
end (dok 
writeln(s:1,17",m:4); 
readiln(n); 
if nC 50 then goto ismetles 


end. (factor) 
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program rfactor; 


var n : real; 


( szzzmzszzzzzzzszzzzezzzzszsszszszszzszses ) 


function ihaj(ni : real) : real; 


begin ( ihaj ) 
if (ni C- 1) then ihaj :- 1 
else ihaj :— ni " ihaj(ni - 1) 
end; ( ihaj) 


( szszammanzzzszezszezzzzezzszszzszezzzzsse ) 


begin ( rfactor ) 
repeat 
readin(n); 
writeln(n:1:0,1 s "ihaj(n):1:0); 
writeln; 
until (n — 0); 
end. ( rfactor ) 


( szzzszszezzzzmzzzzzszzeszezeszszssszessse ) 


program gueens; 


var 
n, k, db : integer; 
x — : array[ 0.. 7] of integer; 


col : arrayl[ 0.. 7] of Boolean; 
up : array[-7.. 7] of Boolean; 
down : array[ 0..14] of Boolean; 
eh : char; 


( szssmaanzzezezszzmezezzazazsszzss ) 


($a-) 
procedure generate; 
var 

h : integer; 


begin 
h :5 0; 
repeat 
if (collh] and up(n-h] and downl[n--h]) 
then begin 

x(n] :— h; 
collh] — :- false; 
up(n-h] :5 false; 
downlnth] :— false; 
n :5 succ(n); 
if (n - 8) then begin 
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write(db:3, 9; 
k :s 0; 


repeat 
write(xIk]--1:1); 
k :- succ(k) 
until (k — 8); 
writeln; 
db :5s succ(db) 
end 
else generate; 
n :- pred(n); 
downlnth] :- true; 
upln-h] :- true; 
collíh] — :-— true 
end; 
h :5 succ(h) 
until (h - 8) 
end; 
($at) 
( szzzazzzszszezszszszzszsszszsszze ) 
begin 
n :5 0; 
db :- 1; 
elrser; 
k :- 0; 
repeat 
coll[k] :5 true; 
k :5 succ(k) 
until k-8; 
k :- 0; 
repeat 
uplk-7] :-— true; 
down[(K! :— true; 
k :5 succ(k) 
until k-15; 
generate; 
writeln; 
writein( Nyomjon meg egy Billenntyut!); 
repeat 
until keypressed; 
read(Kbd.,ch) 
end. 
( —ssszzssszsssésssssssssszszzzzsss ) 
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program hanoi; 


var n : byte; 

lepes : integer; 

ch : Ghar; 
( szsszsazzszsszssssszszzzszsssssssszssszzássztzanzaszzmamaes 
($a-) ( csak CP/M gepen: rekurziv kod ) 


( "ssww HANOI definicioja "ervek 


procedure hanoi rec(ihr, jhr, khr, nhr : byte); 


begin 
if (nhr — 1) 
then begin 
writeln(ihr:2, " —— 5", jhr:2); ( ket korong eseten az atrakas jelzese ) 
lepes :- succ(lepes) 
end 
else begin 
hanoi rec(ihr, khr, jhr, nhr-1); ( rekurziv eljaras elso lepese ) 
hanoi rec(ihr, jhr, khr, 1); ( a maradek korong atrakasa ) 
hanoi rec(khr, jhr, ihr, nhr-1)  ( a rekurziv eljaras befejzese ) 
end 
end; 
($ar) ( csak CP/M gepen: rekurziv kod ) 
( szzzszzzzzzszsszsszsssszsssssssssssssssszszsssszszsssszssss ) 
begin ( main ) 
elrser; 
lepes :— 0; 


write( Korongok szama — 9); 
readln(n); 
writeln; 


hanoi rec(1,2,3.n); 
writeln; 
writeln(lepes, lepes); 


writeln; 
writeln(Nyomjon meg egy billenntyut!); 
repeat 
until keypressed; 
read(Kbd.,ch) 
end. ( main ) 


( sssssssssssssssssssssszsssssssssssszsszesszszsszsszszzszsz ) 
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program stack proba; 


type 
stack - "leiras; 
leiras - record 
adat : integer; 
mutato : stack 
end; 
var 
S1 : stack; 
im mely : integer; 
ch char; 
( ssssssssszzzszzzssssssszssssssszszszssss; ) 
procedure create(var S : stack); 
begin 
new(S); 
S :— nil 
end; 
( -—ssszzsszzzszzszsszzzzzzzzzszzzzzzzzzzz ) 


function Pop(var Spop : stack; npo : integer): integer; 


var 
temp: stack; 
begin 
if (Spop — nil) 
then Pop :- npo 
else begin 
new(ítemp); 
Pop :5s Spop".adat; 
temp :- Spop " .mutato; 
Spop :5- temp 
end 
end; 
( szzzzzszszszzzzzszezszezzsszzzszszzzzzman ) 


procedure Push(ívar Spush : stack; var npu : integer); 
var 
temp : stack; 


begin 
new(temp); 
temp ".adat :- npu; 
temp " .mutato :- Spush; 
Spush :z temp 
end; 
( sznamnunzzauzazasazzazzzezzzzzezzzezzaznee ) 
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function IsEmpty(Se : stack) : Boolean; 
begin 
if (Se — nil) then IsEmpty :— true 
else isEmpty :- false 
end; 


( szsszszemaszzszzezszssszszszsszzsszszsssssz ) 


begin (main program) 
create(S1); 


writeln; 

write(a stack melysege 7 9); 
readin(ímely); 

writeln; 


for im :- 1 to mely do Push(S1.im); 
while not IsEmpty(S1) do writeln(Pop(S1,0)); 
writeln; 
writeln; 
writeln( Nyomjon meg egy billenntyut!); 
repeat 
until keypressed; 
read(Kbd.ch) 
end. 


( szzznmmazazzezszezzzzzzzzzzszszzesszzzzen ) 


program CPM8ODir; 


const 
Search First —- $11; 


Search Next  — $12; 
Set DMA - $1A; 
ScrSize z 22; 
FnameSeparator — /.; 
FCB1 z $005C; 
var 
Error, 
Dir Entry : integer; 
FCB : array[0..25] of byte absolute FCB1; 
DMA : array[0..$FF)] of byte absolute $FEO00; 
ch : char; 


( szzzzszzzzezzzzzzezzzzszzzzzzzzzzzzzszzszzszzzó) 


procedure Display Fname(DMA Shift : integer); 


var Loop, Start : integer; 
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begin 
Start :- DMA Shift " $20; 
for Loop :— Start to (Start t 8) do write(char(memladdr(DMA)--Loopl])); 
write(FknameSeparator); 
for Loop :-— (Start t 9) to (Start § 11) do write(char(memladdr(DMA)rLoop)])); 
writeln 

end; 


( szzszmzuzzzzzzzzzszzzzzazazzzzzzzzzzzszsezee) 
procedure Page; 


const CR — $$0D; 


begin 
if (Dir Entry - ScrSize) 
then begin 
Dir Entry :— T; 
write(" — more ——); 
repeat 
until keypressed; 
write(CR, "".CR) 
end 
else Dir Entry :— succ(Dir Entry) 
end; 
( szszzzzazzszszzszzszzzzzzzzzzaszaszszszmmma ] 
begin 
Dir Entry :- T; 
writeln; 


BDos(Set DMA Addr(DMA)); 


FCB(0] :-— 0; 
FilliChar(FCB[1]8 4t 3,?9); 
Error :z BDos(Search First Addr(FCB)); 


if (Error - $FF) then Writeln(" No files?) 
else while (Error 5 $FF) 


do begin 
Display Fname(Error); 
Page; 
Error :- BDos(Search Next); 
end; 
writeln; 
writeln( Nyomjon meg egy billenntyut!); 
repeat 


until keypressed; 
read(Kbd.ch) 


end. 
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program graphic; 


const 
chgsize - $0800; 
chgstart - $3000; 


type 
mode type - (set point, reset point, change point); 
filename -— string[12]; 
var 
ch : char; 
i,j : integer; 
chgsave : array [1..chgsizel] of byte; 


( szszsszzszzzeszzzezszszzzszeszzzszszszszss ) 


($1 install.inc ) 
($! graphic.inc ) 


( szazzzenzazmuzzszzzzszszszsszsszssssszszzzszzam) 
begin ( graphic ) 

elrser; 

install code("graphic.hex); 


graphic(on); 


for i:-0 to 10 do GR line(0,0,60"i, 199); 
for i:-0 to 9 do GR line(0,0,599,20"i); 


graphic(off); 
end. (graphic) 


( szenzzamzzzzzzzazzzszzzzzzssszzszszsszsses ) 


Az "install.inc" file az alábbi programot tartalmazza: 


procedure install code(code file name: filename); 


type 
MaxString- string[255]; 
var 
line: MaxString; 
code file: text; 
ij: integer; 
memory: integer; 


function convertívar s: MaxString; i: integer): integer; 
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function hexval(ch: char): integer; 


var 
temp: integer; 


begin 
case ch of 
"0295 temp:-48; 
jó: eöésá új temp:-87; 
AG Fs temp:555; 
end; 
hexval:-byte(ch)-temp 
end; 


begin 
convert:-hexval(char(copy(s,i,1)))"16thexvakchar(copy(s.it1,1))) 
end; 


begin 
assign(code file,code file name); 
reset(code file); 


while not EOF(code file) do 
begin 
readln(code file line); 
i:zconvert(line,2); 
if 150 then 
begin 
memory:-convert(line,4) "256 tconvert(line, 6); 
for j:-0 to i-1 do 
begin 
memlmemory]:-convert(line,2"j- 10); 
memory :- memoryt1; 
end 
end 
end; 


end; 


A "graphic.inc" file az alábbi programot tartalmazza: 
( Low level routines to use the VDC memory for graphics ) 
procedure MoveTo( video to, 

number, 

memory from : integer); external $E000; 
procedure MoveFrom(video from, 


number, 
memory to. : integer); external $E003; 


procedure VDC reg write(register, 
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data : byte); external $E006; 


function VDC reg readí(register : byte) : byte; external $E009; 


procedure GR set point( pointer : integer; 


bit : byte); external $E00C; 
procedure GR reset pointí(pointer : integer; 

bit : byte); external $E0O0F; 
function GR test point( pointer : integer; 

bit : byte) : boolean; external $E012; 
( m—zszzszszszszszszzzzszzszzszzzzzzszzzzszzzzzzzzzzzzzzz ) 


procedure ClrScrGraph; 


var 
spaces: string[128]; 
cicle: integer; 


begin 
fillchar(spaces[1],128,0); 
spaces[0]:-char(128); 
for cicle:-0 to 128 do 
MoveTo(128 " cicle, 128, addr(spaces[17])) 


end; 
( Etetetatetatátet ater esetet stetetetáte tetek tetetekee kat atet etetett eket e tetette ) 
procedure GR pointí(x,y : integer; mode : mode type); 
var 

pointer: integer; 

bit: byte; 


begin í( GR point ) 


pointer :5 80 "y t (x div 8); 


bit :z 7 - (x mod 8); 
case mode Oof 
set point . : GR set point(pointer,bit); 


reset point : GR reset point(pointer,bit); 
change point : if GR test point(pointer bit) 
then GR reset point(pointer,bit) 
else GR set point(pointer,bit) 
end (case) 
end; ( GR point ) 


( —esssszsszzszzsszzszssszsszzzzsszzszszzszez ) 


const on - TRUE; 
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off - FALSE; 
procedure graphic(switch : boolean); 
const FG BG 26; ( Foreground / Background color reg. ) 


HOR SCR - 25; ( Horizontal Smooth Scrolling reg. 3 
ATR on - $40; ( Attribute Memory On 


ATR off z $00; ( Attribute Memory Off ) 
TXT on - $00; ( Text Mode On ) 
TXT off - $80; ( Text Mode Off ő , 
SMS on - $07; £( Smooth Scrolling On ) 
WHITE - $0F; 

BLACK  —- $00; 


begin ( graphic ) 


VDC reg write(FG BG(WHITE shi! 4) 4 BLACK); 
case switch of 
on : begin 
MoveFrom(chgstart. chgsize,addr(chgsave)); 
VDC reg write(HOR SCRTXT off 4 ATR off 4 SMS on); 
ClrScrGraph 
end; 
off : begin f 
MoveTo(chgstart,chgsize,addr(chgsave)); 
VDC reg write(HOR SCRTXT on tATR on t SMS on); 
CilrSer 
end 
end; ( case ) 


end; ( graphic) 


procedure GR line(x1,y1,x2,y2: integer); 


var x.y zab .dx.dy.d, 
deltap.deltag : integer; 


begin ( line ) 
dx:-abs(x2-x1); 
dy:5abs(y2-y1); 
if dy.C-dx then 
begin 
x.5x1; 
y:sy1; 
z:-x2; 
if x1€-x2 
then a:-1 
else a:--I; 
if yKI C5-y2 
then b:-1 
else b:5-1; 
deltap:-dytdy; 
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d:5-deltap-dx; 
deltag:5d-dx; 
GR point(x.y.set point); 
while xC5z do 
begin 
x.zxta; 
if dc0 
then d:5-dtdeltap 
else 
begin 
yirytb; 
d:5sdtdeltag 
end; 
GR point(x.y.set point); 
end ( while ) 
end ( then ) 


else 
begin 
y:sy1; 
x:5x1; 
z:zy2; 
if yI €-y2 
then a:5r1 , 
else a:5-1; 
if xXI.C-x2 
then b:-1 
else b:--1; 
deltap:-dxtdx; 
d:-deltap-dy; 
deltag:-d-dy; 
GR point(x,y.set point); 
while vC5z do 
begin 
yisyta; 
if dc0 
then d:-dtdeltap 
else 
begin 
x:5xtb; 
d:5dtdeltag 
end; ( else ) 
GR point(x.y.set point); 
end ( while ) 
end f else) 
end; ( line ) 


procedure GR ellipse(x0,yO,rx,.ry: integer; alfa: real); £ 


const pi-3.141592; 
di-3; s 


var x.y. xe,ye.xk,yk.xke.yke,h dfi, 
SinDfi CosDfi SinAlfa CosAlfa: real; 
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in: integer; 


begin 
h:sry/rx; 
dfi:-di/rx; 
n:-2"trunc(abs(pi/dfi) 0.5); 
dfi:-pi/n"2; 
SinDfi:-sin(dfi); 
CosDfi:-cos(dfi); 
SinAlfa:-sin(alfa); 
CosAlfa:-cos(alfa); 
xke:—rx; 
yke:-0; 
xe:-h"xke"CosAlfa-yke"SinaAlfa; 
ye:syke"CosAlfatH"xke"SinAlfa; 


for i::1 to n do 

begin 
xk:5xke"CosDfi-yke"SinDfi; 
yk:syke"CosDfitxke"SinDfi; 
x:-h"xk"CosAlfath"xk"SinAlfa; 
y:syk"CosAlfath"xk"SinAlfa; 
GR line(round(xetx0) round(yety0) round(xtx0) round(yty0)); 
xke:—xk; 
yke:-yk; 
Xxe:-Xx; 
ye:sy 

end 

end; (fellipse) 
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15. fejezet 

Makro assembler fejlesztő rendszer 

A CP/M rendszerhez külön megvásárolható "Additional Utilities" lemez tartalmazza a 
makro assembler, továbbá a CP/M új változatának generálásához szükséges programo- 
kat. A fejlesztő rendszer további két - önmagában semmire nem használható - 


programja az eredeti lemezen található. 


Sorban ismertetjük az egyes programok használatát. 


GENCOM 

A program segítségével .COM típusú file-hoz memória rezidens bővítést, .RSX-t 
adhatunk hozzá. A töltő (vagyis a CCP.COM program) érzékeli az .RSX bővítést és a 
megfelelő helyre tölti azt. 

Szintaxis: 


GENCOM cfiles cbővítész (ILOADERINULLISCB-(c mut5 , Sértéks)D 


A cfilez a módosítandó parancs file neve, míg a bővítés .RSX file-ok sorozata. Egy 
paranccsal legfeljebb 15 .RSX bővítést tudunk a file-hoz hozzátenni. 


A LOADER paraméter használatakor a töltes-mutató aktív marad. A NULL használata 
jelzi, hogy csak .RSX file-ok vannak a parancsban. Ilyenkor a cfiles5-nak is egy .RSX 
bővítésnek kell lennie. 

A parancs hatására az első file nevével azonos, de .COM kiterjesztésű file-t hoz létre a 
GENCOM, amely file-hoz már hozzáadta a szükséges rezidens bővítéseket. Ha a cfiles 
maga is .COM típusú, akkor az eredeti file elvész. 


Az SCB paraméterrel a rendszer kontroll blokkjának adott paraméterét módosíthatjuk. 


HEXCOM 


A parancs a paraméterként megadott szabvány Intel .HEX formájú file-t transzformálja 
át .COM típusú file-ja. A file kiterjesztését nem kell megadni, mert az csak .HEX lehet. 


Szintaxis: 


HEXCOM -files 


LIB 


A parancs segítségével MicroSoft relokálható formában (REL) levő könyvtárakat 
hozhatunk létre, illetve az abban levő modulokat kezelhetjük. 
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Szintaxis: 


LIB cfiles (I[NMIPIDD 
LIB cfiles (I[IIMIPD-cfilel5(cmód5X cfile25(cCmód5...) 


A könyvtári file-ok vagy .REL vagy .IRL kiterjesztésűek. A .REL típusú könyvtárban levő 
hivatkozások nem mutathatnak visszafelé, mert a LINK program csak egyszer olvassa 
végig a könyvtárat. 


A parancsban az egyes paraméterek jelentése az alábbi: 


I -INDEX. Hatására a létrehozandó új könyvtári file indexelt lesz (és így .IRL) típusú. 
Az indexelt könyvtárak nagyobbak, de gyorsabb bennük a keresés. 

M zMODULE. A paraméter használatakor a rendszer kijelzi a modulok nevét. 

P zPUBLICS. Hatására a könyvtári modulok nevét és a megtalált PUBLICS típusú 
változókat írja ki a rendszer. 

D zDUMP. A paraméter használatakor a program ASCII formában kiírja a modulok 
tartalmát. 


A parancs második formában való használatakor cfiles nevű új könyvtárat hozunk létre 
a már meglevő cfilels, cfile25 stb. könyvtárakból. A file-nevek típusát .REL-nek 
tételezi a program, megadásuk csak akkor szükséges, ha ettől eltér. 


A cxmód5 paraméter adja meg, hogy milyen műveletet kell az adott file-lal végezni. 

nincs aCmód53 megadva A file valamennyi modulja bekerül az új könyvtárba. 

cxanévss A név nevű modul kivételével valamennyi modult átmásolja a rendszer a file- 
ból az új könyvtári file-ba. A C és 5 jelek a parancs részei! 

cnév-file.REL5 A file moduljait a név" nevű modul kivételével átmásolja a program. A 
"név" modul helyett pedig a file" .REL típusú file kerül a könyvtárba. A € és 5 
jelek a parancs részei! 


(item1,item2,...) Az item1, item2 stb. adatok vagy modulnevek, vagy modul1-modul2 
alakúak. A file-ból csak a felsorolt modulok kerülnek át az új könyvtárba. 


LINK 


A program segítségével a MicroSoft REL formátumú file-okból futtatható - .COM típusú 
- file-t állíthatunk elő. 


Szintaxis: 

LINK ( cfilez ([cdopciósD-) cfile15([copcióz IX...) 
A parancs fenti alakjában a cfilel5, cfile25,... file-okból állít elő a program egy 
futtatható, .COM típusú file-t a parancsban használt Copció53-k szerint. Az új file neve 
cfiles lesz. Ha a cfiles-t nem adjuk meg, akkor a futtatható file neve cfilel5.COM 
lesz. 


Az egyes Copció5-k a következők lehetnek: 


A 
A program nem használ puffert, valamennyi ideiglenes adatot a lemezre ír. 
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B 
BIOS összefűzése. SPR file-ok előállítására szolgál. 
Dhhhh 
A DATA és a COMMON szegmens kezdete hexadecimális alakban. 
Gn 
A program indítási pontjának a meghatározása. n a programban szereplő cimke. 
Lhhhh 
A modul töltési címét 100H-ról OhhhhH-ra változtatja. 
Mhhhh 
Memória méret MP/M modulok számára. 
NL 
A szimbolum táblát a rendszer nem listázza ki a konzolra. 
NR 
Nem hoz létre szimbolum tábla file-t. 
OC 
A szerkesztő COM típusú file-t hoz létre. 
OP 
A szerkesztő laphatárra relokálható file-t hoz létre (PRL). 
OR 
A szerkesztő rezidens rendszer-processz file-t (RSP) hoz létre. 
OS 
A szerkesztő rendszer laphatárra relokálható (SPR) file-t hoz létre. 
Phhhh 
Program kezdet megadása. A program kezdetét 100H-ról OhhhhH-ra változtatja. 
a 
Kilistázza a ?-jel kezdődő szimbólumokat. 
s 
A megelőző file-t könyvtárként kezeli, s csak a hiányzó modulokat válogatja ki 
belőle. 
$Cd 
A konzol üzenetek helye. d-X a konzol, d-Y a nyomtató, d-Z nincs. 
Alapértelmezése X. 
$id 
A közbenső file-ok lemezegysége. 
$Ld 


A könyvtári file-okat tartalmazó lemezegység. 
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$0d 
A létrehozott új file lemezegysége. Alapértelmezése a cfile15 által meghatározott 
lemezegység. 


$Sd 
A szimbolum táblát tartalmazó file lemezegysége. 


MAC 

A MAC program a CP/M makro assemblere. 

Szintaxis: MAC cfilez ($copciók2) 

A MAC kizárólag .ASM típusú file-t fordít s HEX típusú file-ra. A lefordított file-neve 
cfiles.HEX lesz. A fordítási listát cfiles.PRN nevű file-ba helyezi el, míg a szimbolum 
táblát tartalmazó file neve cfilez.SYM. Az copcióksz megadásával ezeknek a file- 


oknak a helyét adhatjuk meg. Az opciókat vesszővel kell elválasztani egymástól. A 
használható opciók a következők: 


Ad 
A forrás file (.ASM) helye. d-A-O. 
Hd 
AA fordítás (.HEX) helye. (d-A-O vagy Z. Z esetén nem hoz létre file-t. 
Ld 
A makro könyvtárakat tartalmazó file-ok helye. d-A-O. 
Pd 
A forráslista (.PRN) helye. d-A-OX,P,Z. X-konzol, P-nyomtató, Z-nincs. 
Sd 
A szimbolum táblát tartalmazó file helye. d-A-OX,P.Z. X-konzol, P-nyomtató. 
Z-nincs. 
4L 
A makro könyvtárból olvasott sorokat kilistázza. 
séf 
A makro könyvtárból olvasott sorokat nem listázza ki. 
4M 
Az összes makro sort kilistázza, ahogy a fordítás során megváltozott. 
-M 
A fenti listázásra nem kerül sor. 
xM 
A makrok által generált hexadecimális értékeket listázza csak ki. 
4A 


Valamennyi LOCAL szimbolumot is kilistázza. 
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-Aa 

A LOCAL szimbolumokat nem listázza ki. 
1$s 

A szimbolum táblát a forráslista végére fűzi. 
-S 

Nem hozza létre a szimbol tábla file-ját. 
41 

A PRN file-ban az első menetet is kilistázza a makrok nyomkövetéséhez. 
sag 

A PRN file-ban az első menet listája nem íródik ki. (Alapértelmezés). 
RMAC 


A CP/M relokálható makro assemblere. Segítségével .ASM típusú file-okat fordít .REL 
típusú MicroSoft relokálható formátumú file-ba. 


Szintaxis: RMAC cfiles ($ Rd] Sdl Pd) 


Az egyes paraméterek jelentése a következő: 


Rd 
A fordított, REL típusú file helye. d-A-O,Z. Z-nincsen file generálás, csak 
szintaktikus ellenőrzés. 
Sd 
A szimbolum táblát tartalmazó file helye. d-A-OX,P.Z. X-konzol, P-nyomtató, 
Z-nincs. 
Pd 
A fordítási listát tartalmazó file helye. d-A-O,X,P,Z. Xskonzol, Pényomtató, Z-nincs. 
SID 


A SID (Symbolic Instruction Debugger) a CP/M monitora, s lehetővé teszi a MAC vagy 
RMAC által előállított szimbolum táblák használatát. Nagy hiányossága, hogy nem képes 
a 280 kódokat visszafordítani. Ezért helyette a hasonlóan működő ZSID monitort szokás 
használni. Egyetlen lényeges eltérés a kettő közt, hogy a ZSID Z80, míg a SID Intel 


mnemonikokkal dolgozik! 
Szintaxis: SID Cprogram53(, Cszimbol5) 


Ha nem adjuk meg a cCprogram53 és a cCszimbol5 paramétereket, akkor a SID a 
memóriába tesztprogram nélkül töltődik be. A Cprogram53 .COM vagy .HEX típusú file 
lehet. A cCszimbol53 a szimbolum táblát tartalmazó file neve, a kiterjesztését nem kell 
megadni, a SID mindig .SYM-nek tekinti. 


A SID futása közben a cCTRL-S5z megállítja, míg a CCTRL-O5 újraindítja a képernyőre 


való kiírást. (Használható erre a cCNoScrolls billentyű is! A SID-ből a aACTRL-C5 
megnyomásával térhetünk vissza a CP/M-be. 
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A monitor parancsok paraméterei számok, a szimbolum táblában tárolt nevek és ezek 
közti műveletek lehetnek. Ha egy szimbólikus nevet a (2 jellel előzünk meg, akkor az a 
név által megjelölt és az azt követő memóriahelyen tárolt 16 bites értéket jelenti. Ha a 
nevet egy - jellel előzzük meg, akkor a névnek megfelelő memóriahelyen levő 8 bites 
értékkel tér vissza. 


A SID. hexadecimális számokkal dolgozik. Ha a szám, amit használunk decimális, akkor 4 
jellel kell bevezetni. Pl. OABC vagy 4121. 


A számok, névek értékét összeadhatjuk (1), kivonhatjuk egymásból (-). Egy speciális 
jelet, a felfelé mutató nyilat (t) használjuk a verem tetején levő elem értékére. A 
kifejezésekben használt t nem módosítja a verem tartalmát. Pl. ttt a verem harmadik 
elemének értékét veszi fel. 


A továbbiakban felsoroljuk a SID utasításait: 


As 
Az utasítás kiadása után lehetőségünk van assembly utasítások beírására az s 
címtől kezdve. A beírást egy üres sor bevitelével fejezhetjük be. 


Cs(bf.d3) 
Szubrutinhívás az s címen levő utasításra. b a BC, d a DE regiszterekbe betöltendő 
értéket jelenti. 


D(WwXsX.f) ; i x é6 
Memória tartalmának kijelzése. s a kezdő, f a végcím. Ha a W-t is megadjuk, akkor 
16 bites címeket jelez ki a monitor. 


Ecprogram5(, Cszimbolum5:) 
Program és szimbolum tábla betöltése a memóriába. 


Ex Cszimbolum: 
Csak szimbolum táblát tartalmazó file betöltése a memóriába. 


Fs,f,d 
Adott memóriarész feltöltése a d karakterrel (8 bites értékkel) s a kezdeti, f a 
végcím. 


G(pX(.af(.b)) ré 
Program indítása a p címtől. Ha a p-t nem adjuk meg, akkor az 
utasításszámlálónak a monitor által tárolt értékétől fog elindulni. a és b két 
ideiglenes töréspont címe. A program az elsőnek elért ideiglenes vagy állandó 
töréspontig fut. 


Ha 

Hab 
Az első esetben a monitor kijelzi az a értékét hexadecimális, decimális és ASCII 
alakban, míg a második esetben kijelzi a és b összegének és különbségének 
hexadecimális alakját. 


ICparancsz 


A megadott Cparancsz lesz a CCP bufferében levő karaktersorozat. Segítségével 
szimulálni lehet paramétereket is feldolgozó programok működését. 
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L(s3(f) 


Memória vissza-assemblálása. s a kezdőcím, f a végcím. Ha nincs megadva az s, 
akkor a listázás a monitor által tárolt utasításszámláló értékétől indul. 


Ms,h.d 
Memóriatömb mozgatása. s és h a mozgatandó memória első és utolsó byte-ja, 
míg d az új memóriarész első címe. 


Pípf.cij 


Allandó töréspont definiálása. p a töréspont sorszáma, c az ismétlési tényező. 


Rcfilez(fdj 
Program/szimbolum olvasása. A d valamennyi cím értékét módosítja. 


Síwx(si 4 4 [4 , , d 
A memória adott részébe adatok beirasa. s a kezdőcim. Ha W-t megadjuk, akkor 
16 bites címeket írhatunk be. 


T(nfej 
Program nyomkövetése. n a követendő programlépések száma, c a utility program 
belépési pontja. A nyomon követett program minden egyes lépésének 
végrehajtása után ez az alprogram hívódik meg. 


TWínCcii , 
Program nyomkövetése. n a követendő programlépések száma, c a utility program 
belépési pontja. A program minden egyes lépésének végrehajtása után ez az al- 
program hívódik meg. A W hatására a szubrutinhívásokat nem követi a rendszer. 


U(WXn£e)) j , : MT 
Program nyomkövetése a vegrehajtás kijelzése nélkül. Hatása különben megegye- 
zik a T és TW monitor parancsokkal. 


v j 
Kijelzi a következő elérhető memória címet (NEXT) az olvasott file-ok után 
elérhető első címet (MSZE), illetve az egyáltalán használható memória (END) címét. 


wcfileszísf) 


A cfiles-ba kiírja a memória adott részét. Az első és utolsó kiírt memória címe s 
illetve f. 


! 

X(fj(ri 5 z szk 
A processzor regisztereinek/mutatóinak lekérdezése/beállítása. f-C,E,.,M, vagy Z, 
míg rzsA B.D,H,P vagy S lehet. 

XREF 


Az utasítás az RMAC vagy a MAC által előállított .PRN és .SYM file-okból 
kereszthivatkozási táblázatot készít. 


Szintaxis: XREF (d:) cfiles($P) 


A SYM és PRN file-nak ugyanolyan file-nevűnek kell lennie, mint a cfiles file-név. Ha 
a $P opciót megadjuk, akkor a kereszthivatkozási táblázat a nyomtatóra kerül. 
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